Einzelnen Beitrag anzeigen

Benutzerbild von mael
mael

Registriert seit: 13. Jan 2005
391 Beiträge
 
Delphi XE3 Professional
 
#22

Re: BMP2JPEG - Konvertieren mit Progressbar ?

  Alt 7. Jul 2005, 17:55
Setzte ProgressBar.Max := DateiAnzahl.
In einer Schleife gehst Du durch die Namensliste des OpenDialogs.
Für jeden Namen lädst Du die BMP, speicherst sie als JPG und inkrementierst dann ProgressBar.Position um 1.

Alternativeu kannst natürlich das Ganze noch etwas exakter machen, indem dem Du die Größe der Dateien verwendest, anstatt sie nur zu zählen. Also:
ProgressBar.Max := Summe der BMP-Dateigrößen
Nach Konvertierung einer Datei ProgressBar.Position := ProgressBar.Position + BMP-Dateigröße.

Klar?

Maël.
HxD, schneller Hexeditor:
http://mh-nexus.de/hxd
  Mit Zitat antworten Zitat