Hi,
Thanks-you Jean-Francois for your correction. But it's not enought, the
problem is still here ... I finded why : The new operator failed to load
pseudo object code into a library from a document's call. It's same
problem for GlobalScope library (inter-contener call) or Document
library (inner-contener call).
But I can replace it with a function factory stored into the library and
called from my document ... :
----------------------------------
REM Factory Modul into LibApplication
Option Explicit
Function FactoryTest As Object
FactoryTest = new Test
End Function
----------------------------------
REM Unitary test into my document
Sub Test2()
If not GlobalScope.BasicLibraries.hasByName("LibApplication") Then
MsgBox("Librairie LibApplication non installée !")
Exit Sub
End If
GlobalScope.BasicLibraries.loadLibrary("LibApplication")
if not GlobalScope.BasicLibraries.isLibraryLoaded("LibApplication")
Then
MsgBox("Librairie LibApplication non chargée !")
Exit Sub
EndIf
Dim oTest As Object
oTest = FactoryTest()
oTest.execute()
Erase oTest
End Sub
Note : The Erase function call look's to run perfectly ...
So I need to add a specific modul in pseudo object library with
factories ...
Patrick
Thank you for your help.
Patrick
--
To unsubscribe e-mail to: [email protected]
Problems? https://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: https://wiki.documentfoundation.org/Netiquette
List archive: https://listarchives.libreoffice.org/global/users/
Privacy Policy: https://www.documentfoundation.org/privacy
