ganz schnelle Frage zum datum!

[kingsusu]

Hey Leute,

eine Blitzfrage.

Wie kann ich diesen Satz in delphi ausdrücken.

Wenn das Datum in Maskedit - Datum heute = 0 dann Beep


lg

kingsusu

[nahpets]

Hallo,

ungefähr so?

Delphi-Quellcode:

if StrToDateTime(maskedit.text) - trunc(now) = 0 then Write(#7);

[Wolfgang Mix]

... oder so?

Delphi-Quellcode:

if StrToDate(maskedit.text) - date(now) = 0 then Write(#7);

[kingsusu]

Und was wenn ich sagen will.

Wenn die eingegebene Zeit und das eingegebene Datum - NOW = 0 then ...bla..bla.bla

Ich habe 2 Datetimepicker. Einmal eins fürs Datum und einmal eins für die Uhrzeit.

[nahpets]

Hallo,

Zitat:

Zitat von kingsusu

Und was wenn ich sagen will.

Wenn die eingegebene Zeit und das eingegebene Datum - NOW = 0 then ...bla..bla.bla

Ich habe 2 Datetimepicker. Einmal eins fürs Datum und einmal eins für die Uhrzeit.

weiß nicht, ob ich Dich richtig verstehe:

Delphi-Quellcode:

 if DateTimePickerFuerDatum.Date + DateTimePickerFuerUhrzeit.Time - Now = 0 then Wirte(#7);

[kingsusu]

Zitat:

Zitat von nahpets

Ich habe 2 Datetimepicker. Einmal eins fürs Datum und einmal eins für die Uhrzeit.

weiß nicht, ob ich Dich richtig verstehe:

Delphi-Quellcode:

 if DateTimePickerFuerDatum.Date + DateTimePickerFuerUhrzeit.Time - Now = 0 then Wirte(#7);

[/quote]

Ja genau so will ich das. Aber das klappt nicht so. Ich hab nen anderen Ansatz versucht:

Das für die Zeit. Klappt super.

Delphi-Quellcode:

If TimeToStr(now) = TimeToStr(pickerzeit.Time)
 then showmessage ('Hey') ;

Das für das Datum.

Delphi-Quellcode:

if   DateToStr(now) = DateToStr(pickerdatum.Date) then
showmessage ('Date');

Jetzt will ich ein AND dazwischen legen.

Also so:

Delphi-Quellcode:

If TimeToStr(now) = TimeToStr(pickerzeit.Time) and DateToStr(now) = DateToStr(pickerdatum.Date)  
then showmessage ('AUFWACHEN');

Das letzte klappt aber leider nicht.

[alzaimar]

Du musst Klammern um die einzelnen Terme legen:

Delphi-Quellcode:

IF (a = b) AND (c = d) THEN

Was passiert, wenn Du die Abfrage 1 Sekunde zu spät durchführst?

[kingsusu]

Zitat:

Zitat von alzaimar

Du musst Klammern um die einzelnen Terme legen:

Delphi-Quellcode:

IF (a = b) AND (c = d) THEN

Was passiert, wenn Du die Abfrage 1 Sekunde zu spät durchführst?

Super Danke! Das habe ich gebraucht.

Nach einer Sekunde? Dann passiert nichts.

Ich will mir eine Art Wecker machen, welcher zu einer bestimmten Zeit eine gewisse Nachricht, die man davor irgendwo (jetzt wird meine nächste Aufgabe sein, dieses "irgendwo" genauer zu erforschen) eintippt aufzurufen und mit einem klingeln den Benutzer erinnern, dass er was vergessen hat.

Wenn einer eine Idee hat, wie ich das mache^^ nur her damit :D hehe

[implementation]

Zitat:

Zitat von kingsusu

Delphi-Quellcode:

If TimeToStr(now) = TimeToStr(pickerzeit.Time) and DateToStr(now) = DateToStr(pickerdatum.Date)  
then showmessage ('AUFWACHEN');

Meinst du nicht, dass die Stringumwandlung unnötig ist?

Delphi-Quellcode:

if Now=(pickerzeit.time+pickerdatum.date) then showmessage('Aufwachen!');

[Blackheart]

Gib beim nächsten mal bitte den Crosspost mit an.