OVH Cloud OVH Cloud

Comment effacer (sous VBA6) la couleur d'un cercle (et le cercle)

2 réponses
Avatar
imej-clavier
Bonjour,
J'ai défini la couleur de différents cercles par programmation.
Je souhaiterais les effacer dans un deuxième temps.
Voici mes instructions :
EssaiCercle est le nom de la feuille
mVarX représente X
mVarY représente Y
mRadius représente le rayon
Je pensais pouvoir remplir les cercles déjà coloriés avec ceci :
EssaiCercle.Circle(mVarX,mVarY), mRadius, EssaiCercle.BackColor
Pourquoi cela ne marche t-il pas ? Je n'ai que des cercles rouges.

D'avance merci,

Jean-michel

2 réponses

Avatar
LE TROLL
Bonjour,

REMPLISSAGE D'UN DESSIN FERME
FillStyle = x
1 defaut (transparent)
0 rempli (figure fermée) par FillColor
FillColor = couleur (si FillStyle = 0)
-----------
Le + rapide pour effacer, ben tu lui mets un cercle plus grand de la couleur
de la forme :o)
Avatar
ng
Salut,

Pour le remplissage, regarde les propriétés FillStyle et FillColor pour le
remplissage.
Donc tu peux retracer un cercle par dessus ou faire un .cls pour tout
effacer.

--
Nicolas G.
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/

imej-clavier wrote:
Bonjour,
J'ai défini la couleur de différents cercles par programmation.
Je souhaiterais les effacer dans un deuxième temps.
Voici mes instructions :
EssaiCercle est le nom de la feuille
mVarX représente X
mVarY représente Y
mRadius représente le rayon
Je pensais pouvoir remplir les cercles déjà coloriés avec ceci :
EssaiCercle.Circle(mVarX,mVarY), mRadius, EssaiCercle.BackColor
Pourquoi cela ne marche t-il pas ? Je n'ai que des cercles rouges.

D'avance merci,

Jean-michel