Einem DateTimePicker eine Minute dazu addieren?

[AlexII]

Wer kann mir das bitte sage? Irgendwie komme ich nicht drauf :gruebel:

Delphi-Quellcode:

FormatDateTime('HH:mm', DateTimePicker1.Time) + 1 ?????

[Jens Hartmann]

Hallo Alex,

Delphi-Quellcode:

  DateTimePicker1.Time := DateTimePicker1.Time +1;

Gruß Jens

[AlexII]

Ne das klappt nicht :gruebel:

[Luckie]

Ist ja mal wieder eine wahnsinns Fehlerbeschreibung. :roll:

[Matze]

Delphi-Quellcode:

FormatDateTime('HH:mm', DateTimePicker1.Time + 60/86400);

Das kann man natürlich kürzen o.ä.

[mkinzler]

DateUtils.IncMinute()

[AlexII]

Also ich schreibe nen Wecker und gleiche die Zeit ab, falls man die Zeit im Wecker kleiner als die aktuelle einstellt erscheint eine Fehlermeldung:

Delphi-Quellcode:

if FormatDateTime ('HH:mm', Now) > FormatDateTime('HH:mm', TimePicker1.Time) then
begin
//Error
end;

Die Zeiten dürfen aber auch nicht gleich sein.....

Ja.... wärend ich das hier geschrieben habe ist mir eingefallen wie ich das mache, so nämlich...

Delphi-Quellcode:

if FormatDateTime ('HH:mm', Now) >= FormatDateTime('HH:mm', TimePicker1.Time) then
begin
//Error
end;

Danke Euch!

[Matze]

Eins muss man dir lassen: Du kannst sehr kreativ denken. :lol:

[AlexII]

Ja die einzustellende Zeit im Wecker muss immer min. ne Minute mehr haben, wollte deswegen eine Minute dazuaddieren, aber wenn ich mit ">=" vergleiche ist es getan. Ist halt spät eingefallen. :lol:

[Sir Rufo]

ich bin da zwar nicht so "kreativ" aber das sollte besser funktionieren

Delphi-Quellcode:

if Frac( Now ) >= TimePicker1.Time then

Da muss dann nicht erst von extended nach string konvertiert werden.

Das was du da machst ist vergleichbar mit dem Vergleich von Digitalfotos auf folgendem Weg:

1. DigiFoto mit der Analog-Kamera vom Bildschirm abfotografieren
2. DigiFoto mit der Analog-Kamera vom Bildschirm abfotografieren
Jetzt den Analog-Film zum Entwickeln abgeben
Sind die Abzüge da, dann vergleichen, ob die beiden gleich sind

Geht sehr wohl, aber ... :mrgreen:

[AlexII]

Ich habe das so gemacht, da mein Programm auf verschiedenen Windows Sprachversionen läuft und mit "FormatDateTime" kann ich unabhängig von der Systemeinstellungen vergleichen.

Ist das mit "Frac" genau so möglich?

[DeddyH]

Zahlen sind unabhängig von der Systemsprache :zwinker:

[Matze]

Wieso sollte dein Code die Systemeinstellungen berücksichtigen und der von Sir Rufo nicht?
Du solltest wissen, dass FormatDateTime nichts anderes macht, als den TDateTime-Wert (Float-Wert) in einen formatierten String zu wandeln. Unabhängig von der eingestellten Sprache ist TDateTime eine Zahl, die du somit immer vergleichen kannst.

Edit: Oh, Deddy war deutlich schneller mit dem Antworten. Naja, meine Antwort ist dafür minimal ausführlicher. :stupid:

[AlexII]

Also bei mir im Buch steht:

Zitat:

Statt "DateTimeToStr" sollten Sie besser die zwar umständlichere, aber dafür um so eindeutigere "FormatDateTime"-Funktion verwenden, da Sie damit selbst das Format bestimmen und unabhängig von den Systemeinstellungen (ShortDateFormat) bleiben.

Deswegen verwende ich nur "FormatDateTime". :zwinker:

[DeddyH]

Das gilt für die Ausgabe, nicht für die Berechnung.

[AlexII]

Zitat:

Zitat von DeddyH

Das gilt für die Ausgabe, nicht für die Berechnung.

Ja woher sollte ich das wissen? :roteyes: Und so sind alle Bücher, es wird nie zu Ende geschrieben. :wall:

[DeddyH]

Siehste, das ist unter anderem damit gemeint, wenn hier immer gesagt wird, man soll Logik und Darstellung trennen ;)

[Matze]

Zitat:

Zitat von AlexII

Zitat:

Zitat von DeddyH

Das gilt für die Ausgabe, nicht für die Berechnung.

Ja woher sollte ich das wissen? :roteyes:

Wenn du dir überlegst, was du da eigentlich machst, dann kannst du da ganz leicht selbst drauf kommen. ;) Übernimm nie Code ohne nachzudenken. Gewöhne dir an, alles kritisch zu hinterfragen und zu verstehen.

[AlexII]

Habe ich doch, mit FormatDateTime werde ich immer auf der sicheren Seite, dachte ich.

[mkinzler]

Dieses ist aber nur für die Anzeige, wie Detlef schon geschrieben hat!

[AlexII]

Now hat bestimmt die Formatierung 00:00:00 bzw. hh:mm:ss bei mir in dem TimePicker aber 00:00 bzw. HH:mm, kann man dann trotzdem so vergleichen? :gruebel:

Delphi-Quellcode:

if Frac( Now ) >= TimePicker1.Time then

[Sir Rufo]

ja

PS: ALLE ZEITWERTE SIND EINFACHE ZAHLEN ... DIE HABEN KEINE FORMATIERUNG ... ES HANDELT SICH NICHT UM STRINGS!!!!

[AlexII]

Hab's ausprobiert, funktioniert nicht :lol:

[DeddyH]

Ich bin mir gerade nicht sicher, aber sollte man das nicht so machen?

Delphi-Quellcode:

if Frac(Now) >= Frac(TimePicker1.Time) then

[edit] Ha! Um Sekunden schneller :mrgreen: [/edit]

[Sir Rufo]

Zitat:

Zitat von AlexII

Hab's ausprobiert, funktioniert nicht :lol:

Doch es funktioniert ... aber aus welchen Gründen auch immer liefert TDateTimePicker.Time das gesamte Datum zurück!

also

Delphi-Quellcode:

if Frac( Now ) >= Frac( TimePicker1.Time ) then