Kompomente "klaut" Pfeiltasten, Keyboard-Hook ?

[hoika]

Hallo,

Teil-Lösung:

Delphi-Quellcode:

function KeyboardHookProc(Code: Integer; WordParam: Word; LongParam: LongInt): LongInt; stdcall;
begin
  if Code>0 then
  begin
    case WordParam of
      VK_LEFT:
        begin
          WordParam:= 0;
          Form3.MoveLeft;
          Result:= 1;
          Exit;
        end;
    end;
  end;

  Result:= CallNextHookEx(KBHook, Code, WordParam, LongParam);
end;

so in etwa beschrieben bei MSDN

KeyboardProc


Problem:
Die Form-Methode wird "irgendwie" zweimal aufgerufen.
Setze ich dort einen Breakpoint oder ein ShowMessage, nicht.

Ein EmptyKeyQueue via PeekMessage klappt auch nicht ;(


Heiko