Delphi-PRAXiS - Delphi Bruchzahl in Uhrzeit umrechnen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Bruchzahl in Uhrzeit umrechnen (https://www.delphipraxis.net/147671-bruchzahl-uhrzeit-umrechnen.html)

DelphiManiac

13. Feb 2010 19:07

Bruchzahl in Uhrzeit umrechnen

Hallo,

ich habe eine recht simple Frage,
es geht darum eine Bruchzahl z.B.: 8,5 in eine Uhrzeit umzurechnen also 8:30 Uhr.
Gibt es denn eine Funktion die dies automatisch so formatiert? Ansonsten kann ich ja einfach den Nachkommateil bewerten.
Wie würdet ihr es am "schönsten" machen?

Vielen Dank schonmal
Gruß
DelphiManiac

himitsu

13. Feb 2010 19:17

Re: Bruchzahl in Uhrzeit umrechnen

Delphi-Quellcode:

TimeToString(X / 24)

Im Grunde alle TDateTime-zu-String-Umwandlungsfunktionen, welche Delphi dir bietet.

TDateTime ist auch eine Bruchzahl, wo der Nachkommaanteil der Uhrzeit entspricht.

Oder du zerlegst es selber

Delphi-Quellcode:

			Format('%d:%d', [Trunc(x), Trunc(Frac(x) * 60)])

Format('%d:%.0n', [Trunc(x), Frac(x) * 60])

DelphiManiac

13. Feb 2010 19:36

Re: Bruchzahl in Uhrzeit umrechnen

Vielen Dank,

TimeToStr ist bestens.. :-)

Viele Grüße
DelphiManiac

Alle Zeitangaben in WEZ +1. Es ist jetzt 01:55 Uhr.