Dann Schluss mit blinde Kuh - wo ist dein Code?
PS:
Habe deinen Code untersucht und festgestellt, dass da noch einige Unterschiede zwischen D5 und D7 sind. Hier hast du einen Ersatz für das fehlende TryStrToDate():
Delphi-Quellcode:
function TryStrToDate(const s: String; var dt: TDateTime): Boolean;
begin
try
dt := StrToDate(s);
Result := true;
except
Result := false;
end;
end;
Die TFormatSettings gibt es noch nicht, es wird noch mit globalen Einstellungen gearbeitet. Den Aufruf von GetFormatSettings kannst du dir dann sparen. Das hier ist aber noch nötig - sicher ist sicher:
Delphi-Quellcode:
DateSeparator := '.';
ShortDateFormat := 'dd.mm.yy';
Du kannst die von dir benutzte Delphi-Version übrigens in dein
DP USer-Profil eintragen.
Freundliche Grüße vom marabu