Hallo,
ich möchte einen Wecker schreibe und hab folgendes geschrieben:
Delphi-Quellcode:
procedure TForm4.FormShow(Sender: TObject);
begin
DateTimePicker2.Time:=Now;
end;
procedure TForm4.Timer1Timer(Sender: TObject);
begin
if DateTimePicker2.Time=Now then ShowMessage('Ok');
end;
Die if Abfrage funktioniert komischerweise nicht, verstehe nicht wieso, ist doch alles richtig geschrieben.
Timer.Interval :=1 sek. Wer weiß da weiter? Danke!