von Stephan » So, 28.05.2017 21:17
Hallo Balu,
Tja dann habe ich deinen Titel hier falsch interpretiert. Spielt aber auch keine Rolle.
stimmt, spielt keine Rolle, aber ich verstehe jetzt erst wie Du überhaupt darauf kamst.
Ich sprach aber nur von Hintergrundgrafik zur Laufzeit abschalten, einen Dialog zur Laufzeit
erstellen meint hingegen den kompletten Dialog nur per Code erstellen, d.h. es gibt keinen in der IDE vorher erstellten Dialog den man nur per Code starten muss, z.B.:
Code: Alles auswählen
Sub Main
wv_fortschritt_model = CreateUnoService("com.sun.star.awt.UnoControlDialogModel")
wv_fortschritt_model.setPropertyValue("Width", 150) '343
wv_fortschritt_model.setPropertyValue("Height", 20)
wv_fortschritt_model.SetPropertyValue("Title","Bitte etwas Geduld")
oMod_warten = wv_fortschritt_model.createInstance("com.sun.star.awt.UnoControlFixedTextModel")
With oMod_warten
.setPropertyValue("Name","warten1")
.setPropertyValue("PositionX",5) '192
.setPropertyValue("PositionY",5)
.setPropertyValue("Width",140)
.setPropertyValue("Height",13)
.setPropertyValue("Label","Inhaltsverzeichnis wird erzeugt...")
End With
wv_fortschritt_model.insertByName("warten1", oMod_warten)
wv_fortschritt = CreateUnoService("com.sun.star.awt.UnoControlDialog")
wv_fortschritt.setModel(wv_fortschritt_model)
oWin2 = CreateUnoService("com.sun.star.awt.Toolkit")
wv_fortschritt.createPeer(oWin2, null)
wv_fortschritt.setVisible(True)
End Sub
Gruß
Stephan
Hallo Balu,
[quote]Tja dann habe ich deinen Titel hier falsch interpretiert. Spielt aber auch keine Rolle.
[/quote]
stimmt, spielt keine Rolle, aber ich verstehe jetzt erst wie Du überhaupt darauf kamst.
Ich sprach aber nur von Hintergrundgrafik zur Laufzeit abschalten, einen Dialog zur Laufzeit [i]erstellen [/i]meint hingegen den kompletten Dialog nur per Code erstellen, d.h. es gibt keinen in der IDE vorher erstellten Dialog den man nur per Code starten muss, z.B.:
[code]Sub Main
wv_fortschritt_model = CreateUnoService("com.sun.star.awt.UnoControlDialogModel")
wv_fortschritt_model.setPropertyValue("Width", 150) '343
wv_fortschritt_model.setPropertyValue("Height", 20)
wv_fortschritt_model.SetPropertyValue("Title","Bitte etwas Geduld")
oMod_warten = wv_fortschritt_model.createInstance("com.sun.star.awt.UnoControlFixedTextModel")
With oMod_warten
.setPropertyValue("Name","warten1")
.setPropertyValue("PositionX",5) '192
.setPropertyValue("PositionY",5)
.setPropertyValue("Width",140)
.setPropertyValue("Height",13)
.setPropertyValue("Label","Inhaltsverzeichnis wird erzeugt...")
End With
wv_fortschritt_model.insertByName("warten1", oMod_warten)
wv_fortschritt = CreateUnoService("com.sun.star.awt.UnoControlDialog")
wv_fortschritt.setModel(wv_fortschritt_model)
oWin2 = CreateUnoService("com.sun.star.awt.Toolkit")
wv_fortschritt.createPeer(oWin2, null)
wv_fortschritt.setVisible(True)
End Sub
[/code]
Gruß
Stephan