IBM Lotus Symphony


Función CreateUnoService [Ejecución]

Crea un caso de servicio Uno con el ProcessServiceManager.

Sintaxis:

oService = CreateUnoService( nombre de servicio Uno)

Ejemplos:

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

El código siguiente utiliza un servicio para abrir diálogo de apertura de archivo:

Sub Main

fName = FileOpenDialog ("Seleccione un archivo")

print "archivo seleccionado: "+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


Comentarios del producto | Documentación adicional | Marcas registradas