Einzelnen Beitrag anzeigen

DocE

Registriert seit: 25. Mär 2004
108 Beiträge
 
#8

Re: Verzeichnisse nach Dateien durchsuchen

  Alt 11. Aug 2006, 11:25
Also der übergebene Parameter, z.B. StartFolder, wird "nach außen" nicht verändert. Nur intern bekommt er ggf. einen Backslash verpasst. Beim FindNext wird eigentlich gar nichts verändert.

Also wenn Du das ganze wir folgt aufrufst:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var StartFolder: string;
begin

  StartFolder := 'C:\Programme';
 
  FindAllFiles(StartFolder,'*.*');

  ShowMessage(StartFolder); // <- ist immernoch 'C:\Programme'

end;

Grüsse
...Doc
  Mit Zitat antworten Zitat