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: [email protected]
Reporter: [email protected]
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._______________________________________________
Libreoffice-bugs mailing list
[email protected]
https://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
