Poignée sur une Polyligne
Bonjour,
Voilà, je voudrais pouvoir modifier une polyligne déja tracée, c'est-à-dire sélectionner un point, le deplacer et redessiner la polyligne... Pour l'instant je ne suis qu'au dessin de la polyligne où j'utilise un objet TBGRABitmap, mais je ne vois pas trop comment je peux faire pour modifier l'emplacement d'un point...
Peut-être en testant la couleur du pixel, je ne sais pas trop.
Voilà ce que j'ai fait pour l'instant :
Code:
1 2 3 4 5 6
| procedure TForm1.ToolButton1Click(Sender: TObject);
begin
image.Canvas.Pen.Color := ClRed;
image.Canvas.Polyline([Point(400, 100), Point(200, 600), Point(300, 600)]);
end; |
Merci