IBM Lotus Symphony


Funkcja CreateUnoService [środowisko wykonawcze]

Powoduje utworzenie wystąpienia usługi Uno w obiekcie ProcessServiceManager.

Składnia

oService = CreateUnoService (Nazwa_usługi_UNO)

Przykłady

oIntrospection = CreateUnoService( "com.sun.star.beans.Introspection" )

Poniższy kod umożliwia otwarcie okna dialogowego otwierania pliku przy użyciu usługi:

Sub Main

fNazwa = FileOpenDialog ("Wybierz plik")

print "wybrano plik: "+fNazwa

End Sub

function FileOpenDialog(tytul as String) as String

filepicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")

filepicker.Title = tytul

filepicker.execute()

files = filepicker.getFiles()

FileOpenDialog=files(0)

End function


Opinia na temat produktu | Dodatkowa dokumentacja | Znaki towarowe