DateTimePicker richtig konfigurieren!

[Newcomer91]

Guten Morgen,

ich habe mir neulich ein kleines Tool zur Speicherung von Notizen erstellt.
Dazu habe ich 2 DateTimePicker verwendet.

Der eine gibt die momentane Zeit und der andere das aktuelle Datum wieder. Funktionierte alles super. Damit es gut klappte, implementierte ich im FormCreate

Delphi-Quellcode:

  DateTimePicker1.Time:= Now;
  DateTimePicker2.Date:= Now;

Leider musste ich heute morgen feststellen, dass das Datum <> Now ist sondern noch auf dem Stand von gestern.

Was kann ich machen?

LG New

[mkinzler]

Versuch mal

Delphi-Quellcode:

  DateTimePicker1.Time:= Frac(Now);
  DateTimePicker2.Date:= Trunc(Now);

[Newcomer91]

Okay, dankesehr

Müsste nun nurnoch wissen was die beiden formulierungen Frac und Trunc bedeuten? ich kenne Trunc als Kofferraum.

[mirage228]

Delphi speichert TDateTime als Kommazahl. Hinter dem Komma ist die Tageszeit, vor dem Komma das Datum. "0,5" wäre z.B. 12 Uhr mittags.

Frac = Fraktaler Anteil = "Alles was hinter dem Komma ist" = Zeit-Anteil
Trunc = Truncate = "Alles was vor dem Komma ist" = Datum-Anteil

Viele Grüße

[Bernhard Geyer]

Zitat von Newcomer91:

Müsste nun nurnoch wissen was die beiden formulierungen Frac und Trunc bedeuten? ich kenne Trunc als Kofferraum.

Dann befrag doch mal deine Delphi-Hilfe ... (Curser auf Frac stellen und F1 Drücken ...)

[Newcomer91]

Ein Danke an mirage228 und ein Kompliment an Bernhard Geyer, echt klasse wie schnell du erkannt hast dass ich doch zunächst die Hilfe hätte aufrufen sollen
Es ist notiert.

[DeddyH]

Und für "Notfälle" gibt es auch noch die DP-Referenz

[shmia]

Was übrigens kaum bekannt ist:
bei der Arbeit mit den Datentypen TDate, TTime und TDateTime wäre
die function Int(X: Extended): Extended; der Funktion Trunc() vorzuziehen.

Vom Ergebnis macht es zwar keinen Unterschied, aber Trunc() liefert einen Integer-Wert,
der vom Compiler sogleich wieder in einen Double-Wert umgewandelt werden muss.
Wenn man die Funktion Int() verwendet, bleibt man bei den Flieskommazahlen.