message kommt im Fenster nicht an

[R2009]

Hi Alaitoc,
da meckert der Compiler "unbekannte messagelist"
Aber wo hast du mir Code geschickt?
Es müsste doch aber eigentlich so sein dass getmessages bei jeder message durchlaufen wird oder?

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Button1: TButton;
    Memo1: TMemo;
    Memo2: TMemo;
    Button2: TButton;
    Memo3: TMemo;
    Label1: TLabel;
    Label2: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);

    procedure Button2Click(Sender: TObject);
    procedure FormActivate(Sender: TObject);
    private
    { Private-Deklarationen }
     procedure GetMessages(var msg: TMsg; var handled: boolean); message SET_LNG_CMD;
   s:pointer;
  public
    { Public-Deklarationen }
  end;

Grüsse
Rainer

PS: ich bin jetzt völlig daneben. Weiss garnichts mehr.