Effacer une line!

Salut a tous;
Voila j'ai 2 button:dans Button1click il dessine un ligne
dans Button2click il efface la ligne dessiner.
mon problemme est que j'arrive pas a effacer la ligne dessiner.
Si quelqu'un pouvait m'aider ce serait bien gentil
Merci d'avance.

Qu'est ce que tu utilises pour dessiner ta ligne?
Est ce que tu peux être plus précis?

Voila l'exemple

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

TPoint vertices [5]; vertices[0]= Point (170,70); vertices[1]= Point (170,410); vertices[2]= Point (620,410); vertices[3]= Point (620,70); vertices[4]= Point (170,70); //-------- Canvas->Pen->Style=psSolid; Canvas->Pen->Color=clBlue; Canvas->Pen->Width=5; Canvas->Polyline(vertices,4); //--------------

---

et avec button2Click je voudrais tout effacer.

Une solution serait de tout effacer en repeignant par dessus, par exemple avec le code suivant :

Code:

---

1 2 3 4

MyRect = Rect(0,0,Form1->Width,Form1->Height); Canvas->Pen->Color=Form1->Color; Canvas->FillRect(MyRect);

---

De se fait, on repaint de la couleur de la Form, sur toute la surface de la Form. Sinon je ne pense pas que l'on puisse supprimer une modification du Canvas, mais je me trompe peut être.
A voir si cette solution peut te dépanner.

Salut !

En redessinant l'objet graphique avec la couleur du fond ?

Code:

---

Form1->Canvas->Pen->Color = Form1->Color;

---

A plus !

en fait c'est un encadrement que j'ai dessiner
et le probleme est que j'ai plusieurs de differentes tailles
mais pour mettre l'encadrement suivant il faut d'abord effacer le precedent.
ps (dans l'encadrement il y a quelque chose)

Merci Henderson :lol: