Hallo,
ich hoffe ich bin jetzt im richtigen Forum.
Ich versuche gerade Komponenten zu erstellen und hatte dabei die wahnwitzige idee, das ich der Komponente die Moeglichkeit gebe sich per messages mit anderen Komponenten abzugleichen. Die Idee sieht wie folgt aus:
Komponente wird in ihrer Groesse veraendert wodurch sie eine message absendet damit alle Komponenten des gleichen Typs erfahren das da was passiert ist. Diese Komponenten sollen aufgrund der message eine Anpassung starten.
Das Versenden der Message erfolgt derzeit per
Code:
SendMessage(self.Parent.Handle,WM_USER+1024,0,0)
Das Empfangen bereitet mir allerdings im Moment Probleme. Der einzige der auf die Message reagiert ist das Hauptfenster (TForm). Ich weiss leider absolut nicht wie ich eine Message absenden soll damit die untergeordneten Komponenten der Form auch reagieren.
Die Procedure zum Messageempfang ist von hier abgeschaut *g*
Code:
procedure WMHACK(var msg : TMessage);message WM_USER+1024;
...
procedure MessageVersuch.WMHACK(var msg : TMessage);
begin
ShowMessage('Es geht!');
end;
Die Komponente welche empfangen soll ist von TComponent abgeleitet.
Ich hoffe mein Problem wurde verstanden, ich weiss sonst nicht wie ich es anders ausdruecken soll
