Einzelnen Beitrag anzeigen

DieFliege

Registriert seit: 6. Aug 2013
54 Beiträge
 
Delphi XE4 Professional
 
#1

Kreis im transparenten TImage zeichnen

  Alt 17. Dez 2022, 11:42
Hallo zusammen,

ich habe gerade einen Deckfehler oder ein Brett vorm Kopf:

In meinem Tool verwende ich 2x TImage
1x TImage, in dem ein Bild vorhanden ist
1x TImage, in dem ich 2 Kreise zeichnen möchte

Die beiden TImage liegen übereinander, dabei soll der gezeichnete Kreis über dem Bild (TImage1) erscheinen. Das Zeichnen des Kreises ist auch kein Problem, jedoch soll der Rest transparent sein, sodass das Bild im Hintergrund zu erkennen ist.

Irgendwo habe ich einen Denkfehler drin und sollte ich ein Thema im Forum übersehen haben, das mein Problem lösen könnte, bitte ich um Entschuldigung.

Über etwas Hilfe wäre ich dankbar.

LG DieFliege


Delphi-Quellcode:
image2.Canvas.Pen.Color := clRed;
image2.Canvas.Pen.Width := 3;
image2.Canvas.Brush.Style := bsClear;
image2.Canvas.Ellipse(100, 100, 300, 300);

Geändert von DieFliege (17. Dez 2022 um 13:00 Uhr)
  Mit Zitat antworten Zitat