---

Hallo

Ich wollte mal fragen, ob das Problem normal ist. Mit:

Code:

---

' ProgressBar erstellen
            Dim oProgressBar As Inventor.ProgressBar
            oProgressBar = myInventor.CreateProgressBar(False, iAllCurveCount, myBasic.Caption)
            oProgressBar.Message = "Bitte warten"

            'Hier kommt dann was was länger dauert.

            ' ProgressBar schliessen
            oProgressBar.Close()

---

soll der ProgressBar (frei stehend, nicht in der StatusBar) angezeigt werden. Tut soweit auch, aber beim Schließen des ProgressBar, wird das Inventorfenster in den Hintergrund gestellt bzw. die dahinterliegende Fenster wird in den Vordergrund geholt. Ich finde keine Ursache dafür und schon gar keine Lösung.

Kann mir einer einen Tip geben?

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

Wollte nur kurz die Lösung mitteilen.
Vor dem geposteten Codeschnipsel hatte ich ein UserInteractionDisabled = True und dahinter wieder auf False stehen. Damit sollte verhindert werden, daß der User irgendwo rumklickt. Seit die beiden Zeilen zwischen Ein- und wieder Ausblenden der ProgressBar stehen, ist der Effekt weg.
Also so:

Code:

---

' ProgressBar erstellen
            Dim oProgressBar As Inventor.ProgressBar
            oProgressBar = myInventor.CreateProgressBar(False, iAllCurveCount, myBasic.Caption)
            oProgressBar.Message = "Bitte warten"

            UserInteractionDisabled = True
            'Hier kommt dann was was länger dauert.
            UserInteractionDisabled = False

            ' ProgressBar schliessen
            oProgressBar.Close()

---

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP