IBM Lotus Symphony


Função CreateUnoService [Runtime]

Cria uma ocorrência de um serviço Uno com o ProcessServiceManager.

Sintaxe:

oService = CreateUnoService( Uno service name )

Exemplos:

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

O código que se segue utiliza um serviço para abrir uma caixa de diálogo de abertura de ficheiro:

Sub Main

fName = FileOpenDialog ("Please select a file")

print "file chosen: "+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


Comentários sobre o produto | Documentação adicional | Marcas comerciais