Ordner koieren mit Fortschrittsanzeige

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von Memo.

    Ist doch nicht so schwer, oder? Also du liest die ganzen dateien aus deinem Ordner/unterordnern aus, speicherst die Pfade in nem Array holst dir aus der Anzahl das Maximum für deine Progressbar. Danach kopierst du eine Datei nach der anderen und erhöst immer deine Progressbar. Ist jezt wsl nicht die sauberste Methode mit dem genauestem Fortschritt, aber wenn die dateien halbwegs gelichgr0ß sind, dann passt das schon. Für genauere angaben musst du die Dateigröße betrachten ;)

    mfg MAANtech
    Das müsstest du adnn mit For lösen

    VB.NET-Quellcode

    1. dim Fl As New List (Of String)(IO.Directory.GetFiles("C:\Ordner"))
    2. ProgressBar1.Maximum = fl.Count
    3. Progressbar.Value = 0
    4. For index As Integer = 0 to Fl.Count-1
    5. ProgressBar.Value = index
    6. Next


    Oder einfach immer um eins erhöhen:

    VB.NET-Quellcode

    1. progressBar.Maximum =IO.Directory.GetFiles("C:\Ordner").ToList.Count
    2. For Each Datei in IO.Directory.GetFiles("C:\Ordner")
    3. ProgressBar.Value+= 1
    4. Next


    Prozente:

    VB.NET-Quellcode

    1. Label.text = ProgressBar.Value/ProgressBar.Maximum *100