Discussion :

[molo2003]

Bonjour à vous,

J'ai lu que pour tous les services uno, on pouvait lister leurs propriétés et les méthodes attachées à ces services.
J'ai utilisé une syntaxe trouvé sur Net (qui cause de débugger) : on crée une instance de service puis à cet objet on applique la propriété "DBG_methods" pour lister les méthodes attachées à ce service.
Mais mon problème est que cette fonctionnalité ne fonctionne pas pour tous les services.
Y a-til une raison ? ou est mon erreur ?
Ci-dessous le code utilisé et les commentaires adéquats.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Main
 
        Dim Obj As Object
   '     Obj = createUnoService("com.sun.star.frame.Desktop")   ' ca marche
    '   Obj = createUnoService("com.sun.star.sheet.CellsEnumeration")      ' ca ne marche pas
     '  Obj = createUnoService("com.sun.star.ui.dialogs.FilePicker")   ' ca marche
      ' Obj = CreateUnoService("com.sun.star.ui.dialogs.Wizard")   ' ca marche
 
     '  Obj = CreateUnoService("com.sun.star.sheet.Cells")      ' ca ne marche pas
 
       Obj = CreateUnoService("com.sun.star.table.Cell")   ' ca ne marche pas
 
           MsgBox Obj.DBG_Properties
             MsgBox Obj.DBG_methods
 
    End Sub

Quand " ça ne marche pas " Obj = Null donc message d'erreur sur la propriété "DBG_Properties"
Pourtant "CellEnumeration" et "Cells" sont bien des services du module "sheet"
ainsi que "Cell" un service du module "Table".
Merci d'avance d'éclairer ma lanterne

[zoom61]

Bonjour,

La liste des services disponibles avec CreateUnoService se trouve ici.

Cdlt.

[njhub]

Bonjour zoom61,

n'y aurait il pas un site équivalent en français pour capter les finesses qui nous
échappent en langue ultra marine et plus encore pour les "anglophobes"