OpenOffice.info

Hey wasgedkongred,

mit "globalscope" setzt sucht OOo den Dialog im "übergeordneten" Bereich, also nicht im Dokument. Na ja, nachdem du ja schon den Begriff genutzt hast, dachte ich, dein Dialog ist dort.

Gruss
Thomas

Sub Macro1
	dim dlgBeschreibung as object
	dim dlg as object	
	Dialoglibraries.Loadlibrary("Standard")
	dlg = CreateUnoDialog(DialogLibraries.Standard.DialogTest)
	dlg.execute() 
End Sub

so klappts:


[code]Sub Macro1
dim dlgBeschreibung as object
dim dlg as object
Dialoglibraries.Loadlibrary("Standard")
dlg = CreateUnoDialog(DialogLibraries.Standard.DialogTest)
dlg.execute()
End Sub[/code]
wasgedkongred

Sub Main
	dim dlgBeschreibung as object
	dim dlg as object
	Globalscope.DialogLibraries.LoadLibrary("Standard")
	 dlgBeschreibung = DialogLibraries.Standard.DialogTest
	dlg = createUnoDialog(dlgBeschreibung)
	dlg.execute
End Sub

danke für den tip, aber obwohl mein code jetzt so aussieht:

[code]
Sub Main
dim dlgBeschreibung as object
dim dlg as object
Globalscope.DialogLibraries.LoadLibrary("Standard")
dlgBeschreibung = DialogLibraries.Standard.DialogTest
dlg = createUnoDialog(dlgBeschreibung)
dlg.execute
End Sub
[/code]

bekomme ich immer noch die fehlermeldung "ungültiger prozeduraufruf", wenn ich nicht gleichzeitig den makroeditor geöffnet habe.
was du hier siehst, ist mein vollständiger code. ich will damit nur den dialog ohne fehlermeldung öffnen, nicht mehr.
fehlt denn sonst noch irgendwas, was wichtig wäre?
ich benutze übrigens OOo 1.1.4. vllt ist das ja wichtig...

setze ich mit
Globalscope.DialogLibraries.LoadLibrary("Standard")

eigentlich den pfad zur library "standard" in soffice oder zu "standard" in meinem dokument?
die zeile scheint nämlich überhaupt nichts zu machen.
wenn ich sie auskommentiere, dann funktioniert alles immer noch gleich gut/schlecht.....

globalscope.DialogLibraries.LoadLibrary("Standard")

Hey wasgedkongred,

mir fehlt in deinen Codezeilen das Laden des Dialoges? Vergessen oder gar nicht vorhanden?
Also die Zeile
[code]globalscope.DialogLibraries.LoadLibrary("Standard")[/code]
Und zwar bevor du Deine zwei Zeilen schreibst.
Versuch es mal.

Gruss
Thomas

	dlgBeschreibung = globalscope.DialogLibraries.Standard.MainDlg
	dlg = createUnoDialog(dlgBeschreibung)

Hallo Leute,

habe ein Problem bei Aufruf eines Dialoges, wenn der Makro-Editor nicht gleichzeitig geöffnet ist. Bekomme dann immer eine Fehlermeldung:
"ungültiger Prozeduraufruf"

mein Code:


[code]
dlgBeschreibung = globalscope.DialogLibraries.Standard.MainDlg
dlg = createUnoDialog(dlgBeschreibung)
[/code]

MainDlg ist ein Dialog, der mit dem Dialogassistenten erstellt wurde.
Wenn der Editor dann gleichzetig mit der Fehlermeldung aufgeht oder ich ihn von vornherein offen habe, dann gibt es kein problem...

danke schon mal im voraus,
wasgedkongred