Hallo Hallo,
ich komme mal wieder an einer Stelle nicht weiter... Und zwar bearbeite ich mehrere Bilder in einer Schleife.
Diese Schleife ist in einem Backgroundworker.
Jetzt will ich den Progress dieses Backgroundworkers ausgeben komme aber da nicht weiter... Bisher sieht der Worker so aus:
Und die Ausgabe so:
So habe ich es probiert, aber das Ende vom Lied ist, dass es nicht geht und auch mit einer For-Schleife klappt es nicht... Vielleicht jemand einen Tipp für mich?
ich komme mal wieder an einer Stelle nicht weiter... Und zwar bearbeite ich mehrere Bilder in einer Schleife.
Diese Schleife ist in einem Backgroundworker.
Jetzt will ich den Progress dieses Backgroundworkers ausgeben komme aber da nicht weiter... Bisher sieht der Worker so aus:
VB.NET-Quellcode
- Private Sub BackgroundWorker1_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
- If Not IO.Directory.Exists(Folder & "/klein/") Then
- System.IO.Directory.CreateDirectory(Folder & "/klein/")
- End If
- For Each Files As String In Directory.GetFiles(Folder, "*.jpg")
- Dim FileName As String = IO.Path.GetFileName(Files)
- Dim oBitmap As Bitmap
- oBitmap = New Bitmap(Folder & "\" & FileName)
- 'PictureBox1.Load(Folder & "\" & FileName)
- bildNachher = AutoSizeImage(oBitmap, 1024, 1536, False)
- bildNachher.Save(Folder & "/klein/" & FileName, Imaging.ImageFormat.Jpeg)
- bildNachher.Dispose()
- oBitmap.Dispose()
- Dim i as Integer
- i=i+t
- BackgroundWorker1.ReportProgress(i)
- Next
- End Sub
Und die Ausgabe so:
So habe ich es probiert, aber das Ende vom Lied ist, dass es nicht geht und auch mit einer For-Schleife klappt es nicht... Vielleicht jemand einen Tipp für mich?