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