IBM Lotus Symphony


Fonction CreateUnoService [Exécution]

Crée une instance d'un service Uno à l'aide de ProcessServiceManager.

Syntaxe :

oService = CreateUnoService( Uno service name )

Exemples :

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

Le code suivant utilise un service pour ouvrir une boîte de dialogue d'ouverture de fichier :

Sub Main

fName = FileOpenDialog ("Sélectionnez un fichier")

print "fichier choisi : "+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


Commentaires en retour sur le produit | Documentation complémentaire | Marques