Wie extrahiere ich gerade die Zeit von einer datetimepicker Komponente in Delphi?

Question

Ich habe eine Datetimepicker-Komponente in einem Delphi-Formular und ich möchte nur die Zeit bekommen. Wenn ich auf das Datum im Debug-Modus schaue, sehe ich 42544.621701, und ich möchte nur 0.621701 ohne den Datumswert erhalten.

Answer 1

können Sie verwenden, um die Frac() Funktion:

var 
    Time: TTime; 
... 
    Time := Frac(DateTimePicker1.DateTime); 

Oder können Sie die System.DateUtils.TimeOf() Funktion verwenden, die sich um Frac() mit einem aussagekräftigeren Namen lediglich eine inlined Wrapper:

uses 
    ..., DateUtils; 

var 
    Time: TTime; 
... 
    Time := TimeOf(DateTimePicker1.DateTime); 

Answer 2

Die Frage geht es eigentlich nicht um einen Date-Time-Picker. Das Steuerelement gibt Ihnen einen Datumswert zurück. Sie suchen nach einer Möglichkeit, nur den Zeitanteil zu extrahieren. Tun Sie das mit der TimeOf Funktion von der System.DateUtils Einheit.

MyTime := TimeOf(MyDateTime);