Hallo Zusammen,
ich habe eine
Unit ohne Form und möchte darin eine Timer haben.
Im initialization teil habe ich die Komponente Timer erzeugt.
Wie kann ich bitte das event OnTimer nutzen? Es soll die Procedure
MyTimerOnTimer aufrufen.
Delphi-Quellcode:
...
procedure MyTimerOnTimer(Sender: TObject);
begin
MyTimer.Enabled := false;
CheckUser;
MyTimer.Enabled := true;
end;
initialization
MyTimer := TTimer.Create(Application);
MyTimer.Interval := 10000;
MyTimer.OnTimer := MyTimerOnTimer; <<< so geht es leider nicht.
MyTimer.Enabled := true;
finalization
MyTimer.Enabled := false;
Gruß Kostas