Mach eine Variable in der Speicherst du den Namen der 1. gefundenen Datei und das Datum. Bei der nächsten Datei überprüfst du, ob das Datum später ist, wenn ja, wird der Datumswert und Dateiname in der Variable ersetzt. (usw)
Und du musst nie ein Array "so unendlich lang machen", es gibt ja zum Glück dynamische Arrays:
Delphi-Quellcode:
var
a:array of string;
begin
setlength(a,0);
...
while findnext(s) do
begin
setlength(a,length(a)+1); //a um 1 verlängern
a[length(a)-1]:=s.filename; //Ins letzte Element den Dateinamen speichern
end;
end;
Michael Enßlin
Ich, der ich weiß, mir einzubilden, dass ich weiß, nichts zu wissen, weiß, dass ich nichts weiß.
Sokrates