Problem mit Doppelklick

HAllo

ich habe ien Problem, das mir auf einigen Rechner kein Doppelklick angenommen wird, es scheint so als ob bei diesen Computern zyklisch öfters MouseMove Messages kommen, dadurch passiert es das es teils länger als 100ms dauert das nach dem ersten MouseDown/MouseUp ein MouseMove kommt - obwohl die Maus 100% stillgehalten wurde.

Ich habe nun mal temporär in der procedure TWPCustomRtfEdit.Click;

  while not Ignore and (GetTickCount < tim) and not isDblClick do
  begin
    if PeekMessage(Msg, Handle, WM_KEYFIRST, WM_KEYLAST, PM_NOREMOVE)
      //or PeekMessage(Msg, Handle, WM_MOUSEMOVE, WM_MOUSEMOVE, PM_NOREMOVE)
      then
      Ignore := TRUE
    else if GetAsyncKeyState(FVKLeftMouseButton) < 0 then
    begin
      isDblClick := TRUE;
      break;
    end;
  end;

abgeändert damit es mal funktioniert .... gibt es da einen besseren weg?

hmmmmm..... ich verwende WPTools v8