Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Transparent zeichnen
24. Sep 2012, 16:04
"Dr***s" With
Delphi-Quellcode:
with Image1.Picture do
begin
Bitmap.Width := 200;
Bitmap.Height := 200;
Bitmap.Canvas.FillRect(Bitmap.Canvas.ClipRect);
Bitmap.Canvas.Ellipse(Bitmap.Canvas.ClipRect);
Bitmap.Transparent := True; // welches Bitmap könnte da jetzt erwischt worden sein
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|