Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by A.Griffin,
30. Jun 2017
Vielen Dank. Ich habe es jetzt mit FillRect gemacht. Wäre schön wenn es Canvas.clear o.ä. geben würde.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by A.Griffin,
30. Jun 2017
Ich habe ein quadratisches TShape. Bei MouseUp benutze ich:
shp1.Canvas.Brush.Color := clRed;
shp1.Canvas.Brush.Style := bsSolid;
shp1.Canvas.Ellipse(X-5, Y-5, X+5, Y+5);
um einen kleinen Kreis beim Click auf das Shape zu malen. Ich nutze die Koordinaten (des MouseUp Events) für einen Laserprojektor um einen Punkt zu projekzieren je nach dem wo ich auf das Shape klicke. Wie kann ich bei...