OpenOffice.info

Verfasst: **Mi, 11.02.2009 22:46**

Hi, ich mal wieder

ich würde gerne verwirklichen, dass bei einer Makroausführung ein Dialog mit einer statusanzeige(progressbar) läuft.

Nur starte ich diesen "ProgressDialog" nicht aus demDialog heraus, sondern will ihn bei einer Schleife mittels ButtonKlick bei einem FOrmular anzeigen lassen.
Der Dialog ist fertig, das Makro mit der Schleife auch, nur läuft die Schleife nur weiter, wenn ich den Dialog schliesse.

Wo ist der Denkfehler und wann muss ich den Dialog aufrufen, damit innerhalb des Makros der Fortschritt angezeigt wird ?

lg
Andreas

Verfasst: **Mi, 11.02.2009 23:03**

habs rausgefunde.

ich muss den Dialog nicht ausführen (execute) sondern nur anzeigen lassen (visible = true)

und schon gehts (endexecute nicht vergessen

)

lg andreas

Verfasst: **Fr, 13.02.2009 08:44**

Hallo Andreas!

Interessantes Thema!
Könntes Du das bitte anhand eines kleinen Beispieles (Code) zeigen?

Danke!

Oktobaer

Verfasst: **Fr, 13.02.2009 08:51**

Hi Oktobaer,

guckst Du mal hier.

Viel Erfolg.

Jürgen

Verfasst: **Mi, 18.02.2009 15:06**

sorry für die lange abwesenheit, aber "vodafone" halt :/

beispielcode :

Dialog erstellen, der "Status" heisst und progressbar "Fortschritt"

Code: Alles auswählen

Sub anzeigen
Dim StatusDialog as object
Dim StatusAnzeige as object
Dialoglibraries.Loadlibrary("Standard")
StatusDialog= CreateUnoDialog(Dialoglibraries.Standard.Status)
StatusAnzeige = StatusDialog.getControl("Fortschritt")
StatusAnzeige.model.progressvaluemax = 40 ' (Dein Wert)
StatusDialog.visible = true
For i = 0 to 40
StatusAnzeige.value = i
Wait 500
Next
End Sub

lg Andreas

Verfasst: **So, 01.03.2009 20:57**

Hallo Andreas!

Habe es heute erst testen können: Funktioniert perfekt!

Danke!

Oktobaer

OpenOffice.info

Gelöst :StatusAnzeige im Formular

Gelöst :StatusAnzeige im Formular

Re: Gelöst :StatusAnzeige im Formular

Re: Gelöst :StatusAnzeige im Formular

Re: Gelöst :StatusAnzeige im Formular

Re: Gelöst :StatusAnzeige im Formular

Re: Gelöst :StatusAnzeige im Formular