Discussion :

[ClaudeLELOUP]

Bonjour,

Dans mon formulaire, si le contenu d’une zone de texte est plus long que la largeur disponible à l’écran, un click sur le champ fait apparaître le contenu complet sous la forme d’une info bulle.
Pour cela, j’ai codé ceci

Code :

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

1
2
3
Private Sub MonContrôle _GotFocus()
Me.ActiveControl.ControlTipText = Me.ActiveControl
End Sub

et pour rétablir la situation normale

Code :

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

1
2
3
Private Sub MonContrôle _LostFocus()
Me.ActiveControl.ControlTipText = ""
End Sub

Je voudrais systématiser le déclenchement de ce processus.
Je cherche une solution générale pour déterminer si la longueur nécessaire du texte à afficher (quels que soient le nombre et la police des caractères) est plus grande que la largeur du contrôle (MonContrôle.Width ).

Quelqu’un a-t-il une piste ?

[Invité]

Bonjour

Va jeter sur cet article de Cafeine : Un formulaire auto-extensible pour Access, tu trouveras comment récupérer la longueur du texte grâce à des API.

Starec

[ClaudeLELOUP]

J’étais convaincu qu’il devait exister une API pour solutionner le problème.
Encore fallait-il un AMI pour dire laquelle !
Merci, je n’ai pas encore compris tout l’article, mais je sais déjà qu’il contient la réponse à ma question.
Bonne journée.