Die Queue Auslesen

[mirage228]

Hi,

schreib in die Deklaration deines Forms:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  // ...
  protected
    procedure WndProc(var msg: TMessage); override;
  // ...
end;

implementation

// ...
procedure TForm1.WndProc(var msg: TMessage);
begin  
  // Hier kannst Du irgendwas mit allen Messages, die Dein Form erhält, machen :)
  // z.B.
  // ShowMessage(IntToStr(msg.Msg));
  inherited WndProc(Msg);
end;

mfG
mirage228