Oncreate beenden und function aufrufen (ohne TTimer)

[2Knuckels]

Vielen Dank für Euere Antworten:

Habe das mit dem Win Message gelöst und funktioniert genau wie ichs mir vorgestellt habe:
anbei in Kurzvorm wie das gelöst habe.

const WM_APP_launch_main = WM_USER + 8; // WIN - set message handler for launch of form
type procedure OnMyMessage(var Msg: TMessage); message WM_APP_launch_main; // DECLARE message function

procedure FormCreate
...
PostMessage(self.Handle,WM_APP_launch_main,0,0); // SEND message that create is done
end;

procedure Tform8.OnMyMessage(var Msg: TMessage);
begin
.....
end;