FileAge ist veraltet - alternative

[cherry]

http://www.delphipraxis.net/search.p...906871&start=0 ...hat mir leder alles nicht weitergeholfen...

ich hab folgenden Code: (custom search für TStringList)

Delphi-Quellcode:

function CompareDate(List: TStringList; Index1, Index2: Integer): Integer;
var 
  Val1, Val2: TDateTime;
begin
  val1 := FileDateToDateTime(FileAge(list[Index1]));
  val2 := FileDateToDateTime(FileAge(list[Index2]));
  Result := CompareDateTime(Val1, Val2);
end;

wie verwende ich jetzt die überladene version und was gebe ich als 2ten parameter mit?
oder soll ich das so lassen? funktioniert ja

[edit=SirThornberry]Titel geändert - Mfg, SirThornberry[/edit]