TDateTimeToDouble?

[Wolfgang Mix]

Ich weiss, ist ja nur für mich
als Gedankenstütze

Solche unnützen Funktionen haben die DateUtils von Delphi übigens
auch, z.B.

Delphi-Quellcode:

function Yesterday: TDateTime;
begin
  Result := Date - 1;
end;