CreateUnoService Function
Π‘ΠΎΠ·Π΄Π°ΡΡ ΡΠΊΠ·Π΅ΠΌΠΏΠ»ΡΡ ΡΠ»ΡΠΆΠ±Ρ Uno Ρ ΠΏΠΎΠΌΠΎΡΡΡ ProcessServiceManager.
Π‘ΠΈΠ½ΡΠ°ΠΊΡΠΈΡ
oService = CreateUnoService( ΠΈΠΌΡ ΡΠ»ΡΠΆΠ±Ρ Uno )
For a list of available services, go to: https://api.libreoffice.org/docs/idl/ref/namespacecom_1_1sun_1_1star.html
ΠΡΠΈΠΌΠ΅ΡΡ:
oIntrospection = CreateUnoService( "com.sun.star.beans.Introspection" )
Π ΡΠ»Π΅Π΄ΡΡΡΠ΅ΠΌ ΠΏΡΠΈΠΌΠ΅ΡΠ΅ ΠΊΠΎΠ΄Π° ΡΠ»ΡΠΆΠ±Π° ΠΈΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΡΡΡ Π΄Π»Ρ ΠΎΡΠΊΡΡΡΠΈΡ Π΄ΠΈΠ°Π»ΠΎΠ³ΠΎΠ²ΠΎΠ³ΠΎ ΠΎΠΊΠ½Π° ΠΎΡΠΊΡΡΡΠΈΡ ΡΠ°ΠΉΠ»Π°:
Sub Main
fName = FileOpenDialog ("ΠΡΠ±Π΅ΡΠΈΡΠ΅ ΡΠ°ΠΉΠ»")
print "Π²ΡΠ±ΡΠ°Π½ ΡΠ°ΠΉΠ»: "+fName
End Sub
Function FileOpenDialog(title As String) As String
filepicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")
filepicker.Title = title
filepicker.execute()
files = filepicker.getFiles()
FileOpenDialog=files(0)
End Function