Zitat von
markon:
...
Delphi-Quellcode:
procedure Tfrm_Main.Timer4TimeTimer(Sender: TObject);
begin
sb_dynamic.Panels[6].Text:= FormatDateTime ('hh:nn', Now) + ' Uhr';
if FormatDateTime ('hh:nn:ss', Now) = '10:45:00' then beep;
end;
Und was wenn denn der Timer jetzt erst um 10:45:01 auslöst?
Stephan B.
"Lasst den Gänsen ihre Füßchen"