Festplatten nach Datei durchsuchen

[jim_raynor]

Delphi-Quellcode:

for i := 0 to SL.Count - 1 do
   SearchFiles('test.txt',SL.Strings[i],true,ListBox1.Items);
   SearchFiles('test2.txt',SL.Strings[i],true,ListBox1.Items);

Wenn du mehr als eine Anweisung hast, musst du diese mit Begin...end einschließen.

Delphi-Quellcode:

for i := 0 to SL.Count - 1 do
begin
   SearchFiles('test.txt',SL.Strings[i],true,ListBox1.Items);
   SearchFiles('test2.txt',SL.Strings[i],true,ListBox1.Items); 
end;