cs_rean
Messages postés8Date d'inscriptionlundi 16 décembre 2002StatutMembreDernière intervention23 juin 2003 26 déc. 2002 à 13:24
merci pour vos commentaires, je vais m'atteler a ce programme afin de l'amélioré. merci a tous
cs_TheHacker
Messages postés442Date d'inscriptionsamedi 23 novembre 2002StatutMembreDernière intervention19 octobre 2005 26 déc. 2002 à 02:25
Ton prog est tout basicn mais ca m'a quand meme appris la propriété drawwidth et Pset, merci ! :-)
TheSaib
Messages postés2367Date d'inscriptionmardi 17 avril 2001StatutMembreDernière intervention26 décembre 200723 25 déc. 2002 à 16:52
j'ajouterais une routine dans form_resize pour redimensionnert ton picture par rapport a la taille de ton form :)
C un bon début mais ce n'est pas de niveau 2
miko500
Messages postés188Date d'inscriptiondimanche 29 octobre 2000StatutMembreDernière intervention18 août 2005 25 déc. 2002 à 15:47
Et aussi, ce n'est pas du niveau 2!
miko500
Messages postés188Date d'inscriptiondimanche 29 octobre 2000StatutMembreDernière intervention18 août 2005 25 déc. 2002 à 15:46
Alors, c'est déjà cool ce que tu as fait, bonne intention pour ton petit frère je trouve. Voilà donc les modfications que tu pourrais apporter à ton petit prog de dessin (à titre infomatif :-)) :
-Supprime d'abord ta Picture1 et tes labels de couleur qui y sont.
-Ajoute ensuite un controle CommonDialog que tu nommera "c" (faut pas chercher 12h à 14h lol)
-Ajoute aussi dans ta Form un boutton de commande appelé "Command1".
-Tu peux supprimer la partie :
"Private Sub Label1_Click(Index As Integer)
Picture2.ForeColor = Label1(Index).BackColor
End Sub"
car elle ne te sert plus à rien, maintenant, pour que tu ais un plus large choix de couleurs, tu peux faire appel à la palette de couleurs comme il suit :
"Private Sub Command1_Click() 'Quand on clique sur le Command1
c.ShowColor 'On montre la palette de couleur
Picture2.ForeColor = c.Color 'La couleur de trait est alors celle sélectionnée dans la palette
End Sub"
Mais bon, ce n'est q'un début...et ce que j'en dis moi...
26 déc. 2002 à 13:24
26 déc. 2002 à 02:25
25 déc. 2002 à 16:52
C un bon début mais ce n'est pas de niveau 2
25 déc. 2002 à 15:47
25 déc. 2002 à 15:46
-Supprime d'abord ta Picture1 et tes labels de couleur qui y sont.
-Ajoute ensuite un controle CommonDialog que tu nommera "c" (faut pas chercher 12h à 14h lol)
-Ajoute aussi dans ta Form un boutton de commande appelé "Command1".
-Tu peux supprimer la partie :
"Private Sub Label1_Click(Index As Integer)
Picture2.ForeColor = Label1(Index).BackColor
End Sub"
car elle ne te sert plus à rien, maintenant, pour que tu ais un plus large choix de couleurs, tu peux faire appel à la palette de couleurs comme il suit :
"Private Sub Command1_Click() 'Quand on clique sur le Command1
c.ShowColor 'On montre la palette de couleur
Picture2.ForeColor = c.Color 'La couleur de trait est alors celle sélectionnée dans la palette
End Sub"
Mais bon, ce n'est q'un début...et ce que j'en dis moi...
A ciao tt le monde et bonne prog :-D
MiKo500