Das könnte helfen (wobei es ungewöhnlich ist das nur ein einziger Event durchkommt):
Delphi-Quellcode:
procedure TForm3.FormCreate(Sender: TObject);
begin
WakeMainThread := Wake;
end;
procedure TForm3.Wake(Sender: TObject);
begin
PostMessage(
Handle, WM_NULL, 0, 0);
end;
procedure TForm3.FormDestroy(Sender: TObject);
begin
WakeMainThread := Application.WakeMainThread;
end;
Dadurch wird die Synchronisieranforderung direkt an Form3 gesendet.
MfG,
Dirk