Hallo,
ich benutze in einem Delphi 6 Programm die Funktion SecondsBetween. Dabei ist mir ein Fehler aufgefallen, den mann so reproduzieren kann:
Delphi-Quellcode:
procedure TForm35.Button1Click(Sender: TObject);
var
s1,s2:string;
d1,d2:TDateTime;
diff:Integer;
begin
s1:='05:23:08';
s2:='05:23:19';
d1:=StrToDate('16.07.2014')+StrToTime(s1);
d2:=StrToDate('16.07.2014')+StrToTime(s2);
diff:=SecondsBetween(d1,d2);
Caption:=IntToStr(diff);
end;
In meinem Delphi 6 bekomme ich hier 10 raus. Mit meinem XE2 kommt die erwartete 11 raus. Ich muss allerdings 6 benutzen, da ich eine
CSV Datei mit dem
CSV Reader von hier einlese die noch nicht
Unicode fähig ist. Gibt es außer try and error noch eine Möglichkeit heruaszufinden wann sich die Funktion geändert hat ? Mit wann meine ich dabei welche Delphi Version