Tach ...,
Zitat von
Daniel G:
Zitat von
Hawkeye219:
und damit leider nicht das, was cherry möchte.
Das macht seine Funktion in Beitrag #14 aber auch nicht. Insofern scheint ihn das ja nicht zu stören...
... sehr wohl addiert er 24h hinzu, wenn EndeZeit < StartZeit
Delphi-Quellcode:
if start > ende then
ende:= IncDay(ende);
Zitat von
Daniel G:
An dieser Stelle sei auch mal auf drei tolle Funktionen der
Unit DateUtils hingewiesen:
Delphi-Quellcode:
function DaysBetween(const ANow, AThen: TDateTime): Integer;
function HoursBetween(const ANow, AThen: TDateTime): Int64;
function MinutesBetween(const ANow, AThen: TDateTime): Int64;
Natürlich hätte der OP auch [
oh]function HoursBetween(const ANow, AThen: TDateTime): Int64;[/
oh] nutzen können, aber es gibt noch mehr 'tolle' Functionen in o.g.
Unit! Eine davon benutzt er
[
oh]function HourSpan(const ANow, AThen: TDateTime): Double;[/
oh]
LG Mario