TProgressbar entsprechende Opendialog Files

**danku**

Delphi-Quellcode:

			...

  Progressbar1.Min:=1;

  Progressbar1.Max:= opendiag.files.count;

   //Füllen der StringGrid mit Opendialog1Daten

   sender.RowCount := opendiag.Files.Count+1;

   edaltsender.text := getcurrentdir;

for j:= ProgressBar1.min to ProgressBar1.Max do begin

   for i:=0 to opendiag.files.count -1 do begin

   sender.cells[0,1+i]:= ExtractFileName(opendiag.Files[i]);

   sender.cells[1,1+i]:= Extractfilename(opendiag.Files[i]);

   sender.cells[2,1+i]:= floattostr(FileSize (opendiag.Files.Strings[i]) div 1024);

   Progressbar1.Position:=j;

   end;

end;

...

Hi. Ich lade per Opendialog x-beliebige Files in eine stringgrid (sender).
ein fortschrittsbalken soll das optisch unterstützen.
das problem ist bloß da erst alle dateien in die stringgrid geladen werden,
und erst danach der fortschrittsbalken "wächst".
gibts eine möglichkeit, nach jeder geöffneten, einzelnen datei, den fortschrittsbalken kontinuierlich zu increasen?

mfg danku

TProgressbar entsprechende Opendialog Files

TProgressbar entsprechende Opendialog Files

Forumregeln