Ich habe dieses Problem mit einem Thread und CreateWaitableTimer realisiert.
Das Ereignis kann man durch eine CallBack
Delphi-Quellcode:
type
T??? = class
fOnTimer : TNotifyEvent;
property OnTimer : TNotifyEvent read fOnTimer write fOnTimer;
if Assigned(fOnTimer) then
fOnTimer(Self);
oder
eine Botschaft auslösen
PostMessage(hwndMain, WM_APP + ????, 0, 0);