Actually, believe it or not your code does not work in the documents I have problems with.

I just discovered that I can create dialogs no problem if I start with a fresh new document.

However, I have 32 documents that I have put a lot of work into for which I can not create a new dialogs. This changes the nature of the bug significantly.

I will create you a sample spreadsheet and send it to you.

[EMAIL PROTECTED] wrote:

To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=42240





------- Additional comments from [EMAIL PROTECTED] Wed Feb  9 02:03:09 -0800 
2005 -------
TBE->GRVAL:
I cannot reproduce this task on OOo 1.1.3. Can you please provide a bug doc
with the whole macro in order to reproduce this task.
In what way do you run the macro? From the Macro dialog or via an event
binding?

Nevertheless I assume that you don't load the corresponding dialog library.
Please see the macro below, this should work.


Sub Main()

        Dim oLibContainer As Object
        Dim oLib As Object
        Dim oInputStreamProvider As Object
        Dim oDialog As Object
                
        Const sLibName = "Standard"
        Const sDialogName = "Dialog1"

        REM get library and input stream provider
        oLibContainer = DialogLibraries 
        oLibContainer.loadLibrary( sLibName )
        oLib = oLibContainer.getByName( sLibName )      
        oInputStreamProvider = oLib.getByName( sDialogName )
        
        REM create dialog control
        oDialog = CreateUnoDialog( oInputStreamProvider )
                                                                                
        
        REM show the dialog
        oDialog.execute()
                        
End Sub



---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification




-- Greg Valcourt 985-9736 Systems Technologist Systems Department Legal Aid Manitoba


--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]


--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]



Reply via email to