Event wird nicht ausgelöst ?!

[Muetze1]

Moin!

Wie geschrieben haben alle Komponenten ab TWinControl ein Fensterhandle. Und dieses kann über die Eigenschaft Handle abgefragt werden, was TWinControl einführt. Genau diese Eigenschaft benutzt du doch schon bei der Form. Diese hat diese Eigenschaft genauso von TWinControl geerbt...

MfG
Muetze1

[Apollonius]

Ich halte es bei einer nicht-visuellen Komponente nicht für sinnvoll, von TWinControl abzuleiten. Gehe lieber so wie in TTimer vor: Mit AllocateWnd wird dort ein Fenster erzeugt, welches lediglich Nachrichten verarbeitet.

[ghost007]

Zitat von Apollonius:

Ich halte es bei einer nicht-visuellen Komponente nicht für sinnvoll, von TWinControl abzuleiten. Gehe lieber so wie in TTimer vor: Mit AllocateWnd wird dort ein Fenster erzeugt, welches lediglich Nachrichten verarbeitet.

Jop, genau das hab ich nach einigem rumprobieren auch rausgefunden.

Danke

MfG - Ghost007

P.S.: Kann leider atm nicht weitertesten ... irgdwie freezt bei mir jede application die ich compiliere ... auch eine leere form, sobald ich sie verscheiben will ...

[ghost007]

So,
mein delphi rennt wieder.

Jedoch kann ich die von Apollonius angesprochene funktion allocatewnd weder im msdn noch in der OH finden. wie geb ich meiner kompo ein handle ?

MfG - Ghost007

[DeddyH]

Hier mal der Konstruktor von TTimer:

Delphi-Quellcode:

constructor TTimer.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  FEnabled := True;
  FInterval := 1000;
{$IFDEF MSWINDOWS}
  FWindowHandle := Classes.AllocateHWnd(WndProc);
{$ENDIF}
{$IFDEF LINUX}
  FWindowHandle := WinUtils.AllocateHWnd(WndProc);
{$ENDIF}
end;

[ghost007]

danke, hat geholfen