Status der COM übertragung mittels Progressbar anzeigen

  • VB6

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Modran.

    Dafür mußt Du zuerst feststellen, wie die GESAMT-Länge der Datei, die übertragen werden soll, ist.

    Ist diese kleiner als 32768, dann kannst Du sie direkt als Maximalwert in den ProgressBar eintragen, und sobald wieder ein paar Bytes angekommen sind, trägst Du die Anzahl der erhaltenen Bytes in die Value-Eigenschaft des ProgressBars ein.
    Den Rest macht der Progressbar alleine.

    Leider kann der progressbar keine zahlen verwalten, die größer als 32767 sind - ist die Datei also größer, muß man zuerst einen sinnvollen Faktor ermitteln, mit dem man die Werte wieder in ihre Grenzen weist:

    -8<-----------------------
    Faktor = 1
    Do While GesamtLaenge/Faktor > 32000
    Faktor = Faktor * 2
    '(schneller geht: Faktor = Faktor + Faktor)
    Wend

    Progressbar.Max = GesamtLaenge/Faktor

    'Und immer wenn neue Bytes eintreffen:
    Progressbar.Value = AnzahlEmpfangenerBytes / Faktor
    -8<-----------------------


    Oder habe ich die Frage völlig falsch verstanden?

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Modran“ ()