AV mit TStringList-Methode Add()

[Mackhack]

Hab nochmal ne Frage dazu hier:

Warum ist denn das Files.Count immer 0 und somit kommt nix im TestMemo an?

Delphi-Quellcode:

var
  I : Integer;
  Files : TStringList;
begin
  Memo1.Clear;
  Files := TStringList.Create;
  FindFile.SearchFiles('c:\', Files, '*.xml', False);
  for I := 0 to Files.Count - 1 do
    Memo1.Lines.Add(Files[I])
end;