[fr-users] Re: Boite de dialogue : Résolu

----- Original Message ----- 
From: "pierre-yves samyn" <pierre-yves.samyn@laposte.net>
To: <users@fr.libreoffice.org>
Sent: Saturday, October 22, 2011 11:38 AM
Subject: [fr-users] Re: Boite de dialogue


> Bonjour
>
> Ci-dessous un exemple de procédure dans un module de la bibliothèque
> Standard de "Mes macros" :
>
> option explicit
>
> sub PysMajDoc
> dim PysDlg as object, PysBibli as object, PysDialogue as object
>
> DialogLibraries.Loadlibrary("Standard")
> PysBibli = DialogLibraries.GetByName("Standard")' On charge la bibli
> PysDialogue = PysBibli.GetByName("Dialog1") ' on accède à la boite
> PysDlg = CreateUnoDialog(PysDialogue) ' création du dialogue
>
> 'Si on a quitté le dialogue par OK
>
> if PysDlg.Execute = com.sun.star.ui.dialogs.ExecutableDialogResults.OK 
> then
> print PysDlg.getControl("TxtExemple").text
> end if
>
> end sub
>
> Cordialement
> Pierre-Yves


Merci Pierre Yves,


L'erreur que je faisais provenais que le code d'appel était dans la 
bibliothèque Standard du document.
En le plaçant dans la bibliothèque Standard MesMacro sous forme de fonction 
et en appelant cette fonction depuis le code du document tout fonctionne.

Encore Merci




--
Envoyez un mail à users+help@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés