Message abfangen in Klasse

[cyberblast]

Hallo!

Ich habe eine einfache Klasse (TTest = class) und würde gerne darin die Message CM_DIALOGKEY abfangen.
Doch irgendwie scheint das nicht zu klappen. Eigentlich möchte ich nicht die Klasse deswegen von einem anderen Objekt ableiten.

Habe folgendes probiert

Delphi-Quellcode:

type TTest = class
   {...}
   procedure KeyTrap(var msg: TWMKey); message CM_DIALOGKEY;
   {...}
end;


procedure TTest.KeyTrap(var msg: TWMKey);
begin
   //Irgendwas
end;

Auf einem Form funktioniert es...

Grüsse Martin

[cyberblast]

Habe ne Möglichkeit gefunden:

Eine TApplicationEvents->OnMessage hat sich nun in meine Klasse eingenistet

Grüsse Martin

[SirThornberry]

in einem normalen TObject kannst du so keine Message abfangen da an ein normales Object ja nicht wirklich eine Message geschickt werden kann, es müsste ein Handle existieren wohin man die nachricht schicken kann. Die nachrichten die du über ApplicationEvents bekommst gehen also nicht an das Object selbst sondern an irgend ein Fenster (also Control mit Handle)

[cyberblast]

Habs mir fast gedacht, wäre cool gewesen, aber eigentlich wär's ja dan quasi das selbe wie mit den Appevents wenns funken würde.

Grüsse