Moin, Spätmoin zusammen,
Natürlich ist Stefan an der Lösung...
Zu Encode Time ein Copy aus der Hilfe:
Delphi-Quellcode:
function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;
function TryEncodeTime(Hour, Min, Sec, MSec: Word; out Time: TDateTime): Boolean;
So nun zum Beispiel mit EncodeTimw
EncodeTime(0, 20, 0, 0);
Das generiert einen Wert von 20 Minuten, aber das Prinzip ist natürlich geklärt.
EncodeTime(0, 0, 20, 0);
So kommt es auf die 20 Sekunden.
Viele Grüße in die Runde // Martin