Nach vielen Rumprobieren bekomme ich das korrekte Ergebnis mit einer Zeile.
Delphi-Quellcode:
TimeStart := SecondsBetween(UnixDateDelta, IncHour(Now, 0));
//DateTimeToUnix(IncHour(Now, 0), true);
TimeEnd := SecondsBetween(UnixDateDelta, IncDay(Now, 1));
//DateTimeToUnix(IncDay(Now, 1), true);
Vielen Dank für deine Hilfe.
Aber:
Du wirst es nicht glauben die gleiche Funktion in 10.4 ergibt ein ganz anderes Resultat
nämlich von 14 -> 15 Uhr.
Also da läuft etwas schwer daneben in Delphi
D2010 via 10.4
Ich mache mal ein Video.