Ereignis bei message abfangen geht nicht

[KuH_am_SchuH]

es passiert garnichts

[SirThornberry]

im Moment fängst du gar keine Message ab, das würde so funktionieren:

Delphi-Quellcode:

private/protected/public
  procedure MessageProcedure(var YourMesageVar: TYourMessageTyp); message yourmessage;

konkret könnte das im allgemeinen Fall so aussehen

Delphi-Quellcode:

private
  procedure FWM_SYSCOMMAND(var AMsg: TMessage); message wm_syscommand;

[KuH_am_SchuH]

achsooooo thx

[KuH_am_SchuH]

bei mir sagt delphi dass es bei
procedure FWM_SYSCOMMAND(var AMsg: TMessage); message wm_syscommand; message am schluss nicht kennt... was nun^^?

[KuH_am_SchuH]

was nun was nun^^?

[SirThornberry]

warum zitierst du dich selbst? und warum postest du 3 mal hintereinander? Den "Edit"-Button solltest du doch inzwischen kennen. Das was du machst nennt sich pushen und ist nur nach 24 Stunden erlaubt. Bei dem was du zuerst geschrieben hast, fehlt eindeutig das Leerzeichen. Und das Message darf nur im Deklarationsteils sein

Delphi-Quellcode:

private 
  procedure FWM_SYSCOMMAND(var AMsg: TMessage); message wm_syscommand;
[...]
procedure TYourClass.FWM_SYSCOMMAND(var AMsg: TMessage);
begin
  inherited;
end;