Zitat von
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;
Weil die Methode SearchFiles von der Klasse FindFiles keine Dateien in die StringListe schreibt?