Thema: Delphi Zeitberechnung

Einzelnen Beitrag anzeigen

Benutzerbild von Gollum
Gollum

Registriert seit: 14. Jan 2003
Ort: Boxberg
456 Beiträge
 
Delphi 10.1 Berlin Professional
 
#2

Re: Zeitberechnung

  Alt 28. Jun 2006, 14:25
Hallo,

warum so umständlich? Das geht im Prinzip viel einfacher.

DateTime und konsorten speichern den Zeitanteil im Nachkomma-Anteil der Variable. Wobei 0 = 0 Uhr und 1 = 24 Uhr entspricht. Laut dieser Festlegung entspricht 1 Stunde = 1/24 = 0,041666. Eine Minute wäre in diesem Fall 1/24/60.

Delphi-Quellcode:
function AddMinuten(const aDate:TDateTime; aMinuten:Integer):TDateTime;
begin
  Result:=aDate+aMinuten/24/60;
end;

...
...
ShowMessage(TimeToStr(AddMinuten(Now, 10));
  Mit Zitat antworten Zitat