At 2004-11-27 14:14, Jovial wrote:
Bonjour
J'ai un formulaire avec 15 champs
J'utilise un controle de table pour sélectionner un N° d'enregistrement
qui actualise tous les champs de mon formulaire sur ce N°
J'arrive pas à trouver la méthose (de la Form ou de du Grid) qui me permet
de le faire par programmation
Pour se déplacer dans la table, utiliser avec le formulaire les méthodes de
déplacement indiquées pages 539-540 du livre. Les contrôles associés seront
mis à jour. Exemple, avec la table utilisée dans le livre:
Option Explicit
Sub DeplacerDansGrid()
Dim monDocument As Object, unFormulaire As Object
monDocument = thisComponent
unFormulaire = monDocument.DrawPage.Forms.getByName("MaJClient")
print "Position actuelle : " & unFormulaire.Row
unFormulaire.next
print "Position actuelle : " & unFormulaire.Row
unFormulaire.absolute(7)
print "Position actuelle : " & unFormulaire.Row
unFormulaire.last
print "Position actuelle : " & unFormulaire.Row
End Sub
Les fonctions de déplacement renvoient false si on n'a pu aller à la
position demandée.
Bernard
Pour ceux qui ne connaissent pas le livre en question :
<http://www.eyrolles.com/Informatique/Livre/9782212114393/livre-programmation-openoffice-org.php>