Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Développement Développement Visual Basic taille réelle d'un caractère en twips

taille réelle d'un caractère en twips

5 réponses
Avatar
lionel
bonjour,
le truc pour conna=EEtre la largeur r=E9elle d'un caract=E8re ou=20
d'un texte, dans une police donn=E9e, pour une taille=20
donn=E9e, etc ... ???
Merci
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
François Picalausa
Bonjour/soir,

Tu peux essayer
Largeur = Form.TextWidth("MonTexte")
Hauteur= Form.TextHeight("MonTexte")

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"lionel" a écrit dans le message
de news:07ae01c3dea4$6a79b5f0$
bonjour,
le truc pour connaître la largeur réelle d'un caractère ou
d'un texte, dans une police donnée, pour une taille
donnée, etc ... ???
Merci


Avatar
lionel
bonjour, merci,
en effet ca marche: il s'agit d'un controle utilisateur,
donc UserControl.TextWidth ... marche.
Mais une chose que je ne comprends pas: si il y a
plusieurs TextBox dans le controle, chacun avec sa
police, sa taille, .... il n'y a pas de TextWidth
rattaché au TextBox ...

-----Message d'origine-----
Bonjour/soir,

Tu peux essayer
Largeur = Form.TextWidth("MonTexte")
Hauteur= Form.TextHeight("MonTexte")

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"lionel" a écrit


dans le message
de news:07ae01c3dea4$6a79b5f0$
bonjour,
le truc pour connaître la largeur réelle d'un




caractère ou
d'un texte, dans une police donnée, pour une taille
donnée, etc ... ???
Merci




.



Avatar
ng
En effet, il faudra, par exemple faire ceci :

Dim fontTemp as StdFont, x as long, y as long

Set fontTemp = USerControl.Font
Set UserControl.Font = Text1.Font
x = Usercontrol.FontWidth(Text1.Text) 'par exemple
y = Usercontrol.FontHeight(Text1.Text) 'par exemple
Set Usercontrol.Font=fontTemp
Set fontTemp=Nothing

On pourrait alors créer une fonction faisant cela et rétournant les valeurs
par des paramètres ByRef ou par un type POINTAPI.


--
Nicolas.

Les outils indispensables :

FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Merci de répondre sur le groupe pour en faire profiter tout le monde.
"lionel" a écrit dans le message de
news: 0eba01c3df29$640a0fa0$
bonjour, merci,
en effet ca marche: il s'agit d'un controle utilisateur,
donc UserControl.TextWidth ... marche.
Mais une chose que je ne comprends pas: si il y a
plusieurs TextBox dans le controle, chacun avec sa
police, sa taille, .... il n'y a pas de TextWidth
rattaché au TextBox ...

-----Message d'origine-----
Bonjour/soir,

Tu peux essayer
Largeur = Form.TextWidth("MonTexte")
Hauteur= Form.TextHeight("MonTexte")

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"lionel" a écrit


dans le message
de news:07ae01c3dea4$6a79b5f0$
bonjour,
le truc pour connaître la largeur réelle d'un




caractère ou
d'un texte, dans une police donnée, pour une taille
donnée, etc ... ???
Merci




.



Avatar
lionel
ok compris, merci ...

-----Message d'origine-----
En effet, il faudra, par exemple faire ceci :

Dim fontTemp as StdFont, x as long, y as long

Set fontTemp = USerControl.Font
Set UserControl.Font = Text1.Font
x = Usercontrol.FontWidth(Text1.Text) 'par exemple
y = Usercontrol.FontHeight(Text1.Text) 'par exemple
Set Usercontrol.Font=fontTemp
Set fontTemp=Nothing

On pourrait alors créer une fonction faisant cela et


rétournant les valeurs
par des paramètres ByRef ou par un type POINTAPI.


--
Nicolas.

Les outils indispensables :

FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Merci de répondre sur le groupe pour en faire profiter


tout le monde.
"lionel" a écrit


dans le message de
news: 0eba01c3df29$640a0fa0$
bonjour, merci,
en effet ca marche: il s'agit d'un controle utilisateur,
donc UserControl.TextWidth ... marche.
Mais une chose que je ne comprends pas: si il y a
plusieurs TextBox dans le controle, chacun avec sa
police, sa taille, .... il n'y a pas de TextWidth
rattaché au TextBox ...

-----Message d'origine-----
Bonjour/soir,

Tu peux essayer
Largeur = Form.TextWidth("MonTexte")
Hauteur= Form.TextHeight("MonTexte")

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"lionel" a écrit


dans le message
de news:07ae01c3dea4$6a79b5f0$
bonjour,
le truc pour connaître la largeur réelle d'un




caractère ou
d'un texte, dans une police donnée, pour une taille
donnée, etc ... ???
Merci




.





.



Avatar
Driss HANIB
tu peux mettre en invisible un controle picture et tu mets avant de chercher
txtwidth pricture.font = MaPolice
picture.fontsize=mataille..

et tu auras picture.textwidth(montexte)

et si tu en as beaucoup l'usage, tu te 'bricole une petite focntion du type
:

Function TailleTexte(Police a string, TaillePolice as single, Texte) as long

Driss
"lionel" a écrit dans le message de
news:0a8d01c3df66$944d0680$
ok compris, merci ...

-----Message d'origine-----
En effet, il faudra, par exemple faire ceci :

Dim fontTemp as StdFont, x as long, y as long

Set fontTemp = USerControl.Font
Set UserControl.Font = Text1.Font
x = Usercontrol.FontWidth(Text1.Text) 'par exemple
y = Usercontrol.FontHeight(Text1.Text) 'par exemple
Set Usercontrol.Font=fontTemp
Set fontTemp=Nothing

On pourrait alors créer une fonction faisant cela et


rétournant les valeurs
par des paramètres ByRef ou par un type POINTAPI.


--
Nicolas.

Les outils indispensables :

FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

Merci de répondre sur le groupe pour en faire profiter


tout le monde.
"lionel" a écrit


dans le message de
news: 0eba01c3df29$640a0fa0$
bonjour, merci,
en effet ca marche: il s'agit d'un controle utilisateur,
donc UserControl.TextWidth ... marche.
Mais une chose que je ne comprends pas: si il y a
plusieurs TextBox dans le controle, chacun avec sa
police, sa taille, .... il n'y a pas de TextWidth
rattaché au TextBox ...

-----Message d'origine-----
Bonjour/soir,

Tu peux essayer
Largeur = Form.TextWidth("MonTexte")
Hauteur= Form.TextHeight("MonTexte")

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com


"lionel" a écrit


dans le message
de news:07ae01c3dea4$6a79b5f0$
bonjour,
le truc pour connaître la largeur réelle d'un




caractère ou
d'un texte, dans une police donnée, pour une taille
donnée, etc ... ???
Merci




.





.