Hallo,
du hast Recht.
Ich wollte mit dem Beispiel nur auf die Gefährlichkeit
des TDateTime hinweisen, wenn man damit rechnet.
Um noch mal auf das Addieren zu kommen.
Delphi-Quellcode:
var
tdtDateTime: TDateTime;
begin
tdtDateTime:= StrToTime('08:00')+StrToTime('08:00')+StrToTime('08:00');
if tdtDateTime=1.0 then
begin
// jippi
end
else
begin
// oops
end
end;
Bei mir (und bei einem Kunden ... ;( ) landet er in
oops .
Heiko