Konvertierungsfehler bei Funktion

[himitsu]

siehe DateUtils (Delphi) und SysUtils ... Lazarus k.A. wo.

Mit HoursPerDay oder MinsPerDay multiplizieren und Letzeres kann man auch als Integer rounden.

[khh]

danke dir, gibt es bei Lazarus auch

[Popov]

Welchen Anteil haben Stunden, Minuten und Sekunden am Tagesanteil?

Die 1 steht für 1 Tag oder 24 Stunden. Deshalb berechnet man mit

Delphi-Quellcode:

h := 1 / 24;
...

eine Stunde;

Delphi-Quellcode:

h := 1 / 24 / 60;
...

eine Minute;

Delphi-Quellcode:

h := 1 / 24 / 60 / 60;
...

eine Sekunde;

Delphi-Quellcode:

h := 1 / 24 / 60 / 60 / 1000;
...

eine Millisekunde;

Wobei Delphi 1 Millisekunde mit Double gar nicht erfassen kann. Somit unterliegen die Millisekunden den Rundungsfehlern. Damit sollte man also nicht rechnen.

15 Minuten können somit so berechnet werden:

Delphi-Quellcode:

h := 1 / 24 / 60 * 15;
...

5 Stunden so:

Delphi-Quellcode:

h := 1 / 24 * 5;
...

300 Sekunden so:

Delphi-Quellcode:

h := 1 / 24 / 60 / 60 * 300;
...

[Mikkey]

Zitat von Popov:

Wobei Delphi 1 Millisekunde mit Double gar nicht erfassen kann. Somit unterliegen die Millisekunden den Rundungsfehlern.

Stop, das kann man so nicht stehen lassen.

Ein Double stellt mehr als 15 signifikante Dezimalstellen dar. Ein Datum im jetzigen Zeitalter hat 5 Stellen vor dem Komma, so bleiben für die Uhrzeit 10 signifikante Ziffern übrig. Im Bereich von etwa A.D. 1700 bis 2200 wird ein Zeitstempel also einer Auflösung von <10ns dargestellt.

Dies gilt natürlich nicht für die Uhr des Rechners und auch nicht für das Format, das die Datenbank für die Speicherung solcher Werte verwendet.

[himitsu]

Delphi TDataTime/Double kann Millisekunden erfassen und zwar noch die nächsten paar hundert oder tausend Jahre lang.
Je größer der Datumsteil wird, mit steigendem Abstand von 30.12.1899, desto kleiner wird die Genauigkeit im Nachkommateil.

[edit] Ich sollte F5 benutzen.
15 bis 16 (15,7 oder so)