[Libreoffice-bugs] [Bug 111998] New: BASIC-Laufzeitfehler. Eigenschaft oder Methode nicht gefunden: isFormDesignMode.

bugzilla-daemon at bugs.documentfoundation.org bugzilla-daemon at bugs.documentfoundation.org
Thu Aug 24 06:50:43 UTC 2017


https://bugs.documentfoundation.org/show_bug.cgi?id=111998

            Bug ID: 111998
           Summary: BASIC-Laufzeitfehler. Eigenschaft oder Methode nicht
                    gefunden: isFormDesignMode.
           Product: LibreOffice
           Version: 5.3.5.2 release
          Hardware: x86-64 (AMD64)
                OS: Windows (All)
            Status: UNCONFIRMED
          Severity: normal
          Priority: medium
         Component: Base
          Assignee: libreoffice-bugs at lists.freedesktop.org
          Reporter: martin.schwarz at gundlach.de

Description:
Wehen I use this code:
 Dim xLayoutManager as Object
' If Design mode, just exit the routine and display standard menu and toolbars'
   xCurrentController = thisComponent.CurrentController
   If xCurrentController.isFormDesignMode Then
       Exit Sub
   End If
I get an error message that the method ".isFormDesignMode" cant be found.
This happens with Version LO 5.3 and 5.4, It works with LO 5.1.6.2 perfectly on
Windows 7. 
Also I can say that the same behaviour happens on Linux Mint 18.1.
Can anybody let me know what library is missing this method ?
Thanks Martin

Steps to Reproduce:
1. Install LO Version 5.1.6.2 => this works
2. Install LO Version 5.3 or greater it does not work
3. Important is not to use the same file, always create with the version
installed. Call this code with a simple form1 button:
Sub OnOpenDocument()
Dim oController
oController = ThisDatabaseDocument.CurrentController
If not ( oController.isConnected() ) Then oController.connect() ' Connect to
the database, if necessary
oController.loadComponent( com.sun.star.sdb.application.DatabaseObject.FORM, _
"Formular1", FALSE ) ' Parameters: ObjectType, Parameter ObjectName, ForEditing

Dim xCurrentController as Object
   Dim xLayoutManager as Object
' If Design mode, just exit the routine and display standard menu and toolbars'
   xCurrentController = thisComponent.CurrentController
   If xCurrentController.isFormDesignMode Then
       Exit Sub
   End If
   xLayoutManager = thisComponent.CurrentController.Frame.LayoutManager
   xLayoutManager.visible = false   
end sub


Actual Results:  
Just install Version 5.3 or 5.4 and create a new form

Expected Results:
I works with Version 5.1.6.2 on both Linux and Window system.


Reproducible: Always

User Profile Reset: No

Additional Info:


User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:55.0) Gecko/20100101
Firefox/55.0

-- 
You are receiving this mail because:
You are the assignee for the bug.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.freedesktop.org/archives/libreoffice-bugs/attachments/20170824/5bcec636/attachment.html>


More information about the Libreoffice-bugs mailing list