VB.Net Dessiner du texte dans un PictureBox

cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 - 1 oct. 2007 à 20:44
cs_Stephane33 Messages postés 630 Date d'inscription samedi 15 février 2003 Statut Modérateur Dernière intervention 9 octobre 2011 - 3 oct. 2007 à 20:31
Salut...
Je dessine dans un picturebox des croix. Ces croix sont dessiné à partir de coordonnées. Je veux pour chaque croix dessiner leur numéro. Chaque croix a un numéro.
Quelqu'un m'a suggéré ce code mais ca marche pas...
ca me dit:
'FontFamily' is not a member of 'System.Drawing.Font'

Qu'est ce que je fais de pas correct...
P.S. je veux seulement écrire du texte normal (pas en italic et pas en gras) avec un police normal, sans rien de compliqué)
Mais je ne sais pas comment faire et tout ce que j'essais ne fonctionne pas et tout ce qui m'est proposé ne fonctionne pas non plus...
Je suis découragé...

Merci d'avance






Dim bb As Brush = New SolidBrush(Color.Red)
Dim ff As Font = New Font (MyBase.Font.FontFamily</gras>24, FontStyle.Bold Or FontStyle.Italic)Picturebox1_Graphics.DrawString(Numero, ff, bb, CoordXPicturebox + 5, CoordYPicturebox + 5)

2 réponses

cs_JeffC1977 Messages postés 928 Date d'inscription vendredi 10 novembre 2000 Statut Membre Dernière intervention 23 septembre 2023 4
2 oct. 2007 à 18:20
Pour ceux que ca peut intérésser....

PictureBox1.Image =

New System.Drawing.Bitmap(PictureBox1.Width, PictureBox1.Height)
Picturebox1_Graphics = System.Drawing.Graphics.FromImage(PictureBox1.Image)

Dim objBitMap
As
New Bitmap(X_initial, Y_initial)

objGraphics = Graphics.FromImage(objBitMap)
Picturebox1_Graphics.Clear(Color.White)

For i = 0
To UBound(Tableau)
LigneSplit = Tableau(i).Split(Separateur)
CoordXPicturebox = (Convert.ToDouble(LigneSplit(2)) - ValMinX) * (X_initial / (ValMaxX - ValMinX))
CoordYPicturebox = Y_initial - (Convert.ToDouble(LigneSplit(1)) - ValMinY) * (Y_initial / (ValMaxY - ValMinY))
Picturebox1_Graphics.DrawLine(MyPen, CoordXPicturebox, CoordYPicturebox - 2, CoordXPicturebox, CoordYPicturebox + 2)
Picturebox1_Graphics.DrawLine(MyPen, CoordXPicturebox - 2, CoordYPicturebox, CoordXPicturebox + 2, CoordYPicturebox)

Next iPicturebox1_Graphics = System.Drawing.Graphics.FromImage(PictureBox1.Image)
objGraphics.Dispose()
objGraphics =

Nothing
0
cs_Stephane33 Messages postés 630 Date d'inscription samedi 15 février 2003 Statut Modérateur Dernière intervention 9 octobre 2011 1
3 oct. 2007 à 20:31
Externalise tes croix dans une fonction comme ceque je t'avais envoyer, tu verras plus clair dans ton programme

Le savoir ne sert que si il est partagé par tous
0
Rejoignez-nous