Discussion :

[lpinux]

Bonjour,

j'aimerai dans un formulaire mettre le focus sur un élément par un clic sur un bouton par exemple.
Je crée une macro que j'exécute au clic sur ce bouton.

Après recherches, je trouve différentes choses notamment la méthode setFocus mais celle-ci ne semble pas disponible sur Libreoffice.

Je joins une copie d'un fichier odb essai_focus.zip
Dans ce formulaire j'ai trois zone de texte zt1, zt2, zt3 et un bouton. Au clic sur le bouton, un nouveau temps est placé dans le zt1 et j'essaie de mettre le focus sur zt2 par exemple.

Autre question, mais qui pourrait aussi résoudre mon problème, peut-on avec l'éditeur basic intégré à LibreOffice obtenir l'interface d'une classe c'est-à-dire sur un objet Formulaire, obtenir ces méthodes d'objet et ses attributs ?

Ces information sont-elles disponibles sur un site ? Si oui lequel ?

Merci pour toute l'aide me permettant d'avancer.

Pascal

[Bidouille]

obtenir l'interface d'une classe c'est-à-dire sur un objet Formulaire

Il faut vous servir de l'outil XRay : https://forum.openoffice.org/fr/foru...pic.php?t=3234

[jurassic pork]

Hello,

Dans ce formulaire j'ai trois zone de texte zt1, zt2, zt3 et un bouton. Au clic sur le bouton, un nouveau temps est placé dans le zt1 et j'essaie de mettre le focus sur zt2 par exemple.

A essayer :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub essai_focus(oEvent As Object)
    ' Détection du formulaire parent de l'objet ayant produit l'événement
    Dim oFormulaire, oChamp As Object, zt2 As Object
    oChamp = oEvent.Source.Model                       ' récupère la source de l’événement
    oFormulaire = oEvent.Source.Model.Parent           ' récupère le formulaire contenant la source
    '
    oFormulaire.getByName("zt1").text = "je place un message ici"
    '
    zt2 = ThisComponent.CurrentController.GetControl(oFormulaire.getByName("zt2"))
    zt2.setFocus()
End Sub

Il y a sûrement plus simple

Ami calmant, J.P

[lpinux]

un grand merci, ce code correspond à mon problème.

Cordialement,

Pascal