Ich würde da noch Refacoring ansetzen:
Delphi-Quellcode:
Function FileList (aPath : String) : TSearchRecList;
Begin
Result := TSearchRecList.Create;
Try
ReadDirectory (aPath, Result);
SortListByCreationData(Result);
Except
Result.Free;
Result := Nil;
Raise;
End;
End;
Übersichtlich, einfach zu lesen.
So praktisch Generics auch sind, so 'häßlich' finde ich sie. Ich kapsele lieber bzw. lasse sie nur in den untersten Ebenen ihr wahres Gesicht zeigen. Denn vielleicht ist eine 'TList<TSearchRec>' ja irgendwann nicht mehr das Gelbe vom Ei.