Moin Gerrit,
ich hoffe mal das richtig verstanden zu haben:
Du könntest die WndProc überschreiben.
Delphi-Quellcode:
type
TForm1 = class(TForm)
private
{ Private-Deklarationen }
protected
procedure WndProc(var msg : TMessage); override;
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WndProc(var msg : TMessage);
begin
// Message abfangen
// z.B.
if msg.Msg = ..... then begin
// Message behandeln
end;
inherited WndProc(msg);
end;
ob Du nun tatsächlich immer die geerbte WndProc aufrufst/aufrufen musst, hängt von der jeweiligen Message ab, und was Du mit der Abfrage bezweckst.