Bonjour,
Dans une boite de dialogue j'essaie de faire passer le texte d'un textfield
à un autre avec le code suivant:
Sub OuvrirDialogue
Dim oDialog As Object, oPDialog As Object
Dim oTxt1 As Object, oTxt2 As Object
DialogLibraries.LoadLibrary("Standard")
oDialog = DialogLibraries.Standard.Dialog1
oPDialog = CreateUnoDialog(oDialog)
oTxt1 = oPDialog.getControl("TextField1")
oTxt2 = oPDialog.getControl("TextField2")
oTxt2.Text = oTxt1.Text
oPDialog.Execute()
End Sub
J'ai trouvé comment le faire directement avec les controles sur mon document
writer mais je voudrais passer par une boite de dialogue mais je n'arrive à
rien, même pas de message d'erreur
Le dialogue s'ouvre bien mais le texte ne passe pas d'un textfied à l'autre.
Merci de votre aide
--
View this message in context:
http://nabble.documentfoundation.org/Renvoyer-valeur-entre-textbox-tp3403005p3403005.html
Sent from the Users mailing list archive at Nabble.com.
--
Envoyez un mail à [email protected] 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
