cs_rene38
Messages postés1858Date d'inscriptionsamedi 29 juin 2002StatutMembreDernière intervention17 octobre 201311 31 oct. 2003 à 11:26
Exact Jarod59 : j'avais corrigé mais je n'ai pas posté le bon zip.
Dans la fonction Private Sub Fond_MouseDown(....
il faut ajouter la ligne '****
........
Else ' clic droit : effacement (sur n niveaux)
n = n - 1
If n < 0 Then n = 0: Exit Sub '****
Couleur = Fond.ForeColor
........
Je n'ose olus faire une mise à jour du zip : ma source précédente s'est perdue à l'occasion d'une mise à jour...
cs_jarod59
Messages postés14Date d'inscriptionsamedi 27 juillet 2002StatutMembreDernière intervention 5 décembre 2003 31 oct. 2003 à 09:37
Bonne source
Ya un bug quand je fais un clique droit sur le texte du milieu et quand il y a rien
Sinon c'est trés interressant mais ouais avec une image au milieu c'est bien et faudrait aussi qu'on puisse mettre une couleur de fond sur les bord, ca c'est des choses simples.
bon codding
ciao
31 oct. 2003 à 11:26
Dans la fonction Private Sub Fond_MouseDown(....
il faut ajouter la ligne '****
........
Else ' clic droit : effacement (sur n niveaux)
n = n - 1
If n < 0 Then n = 0: Exit Sub '****
Couleur = Fond.ForeColor
........
Je n'ose olus faire une mise à jour du zip : ma source précédente s'est perdue à l'occasion d'une mise à jour...
31 oct. 2003 à 09:37
Ya un bug quand je fais un clique droit sur le texte du milieu et quand il y a rien
Sinon c'est trés interressant mais ouais avec une image au milieu c'est bien et faudrait aussi qu'on puisse mettre une couleur de fond sur les bord, ca c'est des choses simples.
bon codding
ciao