ProgressBar2.Max := <Anzahl aller Dateien>;
Delphi-Quellcode:
for i := 1 to AnzahlDateien do
begin
MachWasMitDerDatei;
ProgressBar.Position := i;
end;
mfG
mirage228
P.S.
Einen Code für das Herausfinden, wie viele Dateien in einem ordner sind, gibts in der CodeLib nen Code!
David F.