Hi,
ich möchte eine kleine Weckfunktion in mein Prog einbauen.
Da dachte ich mir nehmen ich die DateTimerPicker-Komponente.
Also schrieb ich mir:
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
if DT.DateTime=Time then
showmessage('Test');
end;
DT ist der Picker.
Dies funkionier leider nicht.. er macht einfach nichts zur angegebnen Zeit.
Nun dachte ich das man das nicht direckt machen kann, also packte ich die angeben der Weckzeit und der aktuellen zeit in eigene Variablen... Funltioniert auch nicht.
Nun hab ich zu der Zeit in der ich mit Delphi angefangen hab schonmal nen Wecker gemacht (mit Turbo Delphi, in dem es keinen DateTimePicker gibt). Ich machte das also über einen TEdit.
Da kam mir die Idee das ganze nicht in TDateTime Variablen zu packen sondern in String:
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
if DateTimeToStr(DT.DateTime)=DateTimeToStr(Time) then
showmessage('Test');
end;
Und siehe da.. es funktioniert!!!!
Nun Frag ich mich wiso das so geht, aber nicht direckt???
P.S.: Ist eine Reine Wissens-Frage... Ich werd es jetzt so machen.