Stille: Direktive Message - In zweiter Unit deklariert

[dde]

Ich habe zwei Units. Die erste Unit enthält das Hauptformular. Die zweite Unit ist eine zugehörige Schnittstelle. Ich will Design und Algorithmen dadurch voneinander trennen.

Nun zum Problem:
Ich deklariere und implementiere in der zweiten Unit eine Message-Methode:

Delphi-Quellcode:

type TZweiteUnit=class(TObject);
.
.
.
     procedure WndProc(Msg:TMessage); message WM_USER;

.
.
.

procedure TZweiteUnit.WndProc(Msg:TMessage);
begin
...
end;

Nun schicke ich ne Message WM_USER an das Hauptformular. Es passiert nichts. Gar nichts. Stille.

Wo liegt der Fehler?

[Edit]Im Hauptformular funktioniert es[/Edit]

[Sanchez]

Soweit ich weiß, können nur Fenster auf Windows-Botschaften reagieren. Abkömmlinge von TObject jedenfalls nicht. Außerdem kann die Message nur im Hauptformular ankommen, wenn du sie dorthin schickst und nicht in TZweiteUnit.

Wenn du in deiner 2ten Klasse direkt auf Windows-Botschaften reagieren würdest, dann hättest du doch Design und Algorithmen nicht mehr wirklich getrennt.

grüße, daniel

[Sprint]

Um eine Windows Nachricht empfangen zu können, braucht man auch ein Fensterhandle. TObject hat kein Fensterhandle.

[dde]

Habe TObject gelöscht und stattdessen TWinControl genommen. TZweiteUnit=class(TWinControl). Es ist nicht mehr still.