christianwtd a écrit :

Gatto Francois a écrit :

Bonjour Christian,


On écrira alors quelque chose comme (pour exemple) :

Sub theNiceButton

    oDlg = DialogLibraries.Standard.Dialog1
        oDlgControl = CreateUnoDialog( oDlg )
        for i% = 1 to n ' n = nbre de boutons de la série à gérer
            oButton = oDlgControl.GetControl( "CommandButton" & i% )
        MsgBox oButton.model.label
        next i%

End Sub


Espérant aider.

Je reviens à la charge...
Si j'écris  (juste avant le MsgBox) :
oButton.model.label="Essai" & i%

la ligne :
MsgBox oButton.model.label
me retourne bien :  Essai1, Essai2,...
mais aucun changement réel de titrage des boutons.
C'est grave, docteur ?

Bon surf,
Christian

--
Visitez http://christianwtd.free.fr/ pour débuter avec Calc, d'OpenOffice.org


---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Répondre à