Registriert seit: 24. Aug 2006
Ort: Schwäbisch Gmünd
55 Beiträge
Delphi 2006 Professional
|
Re: Bild rund schneiden bzw. machen
7. Nov 2007, 14:43
Hallo,
Du kannst im nachhinein alle Punkte ausserhalb des Kreises mit der Hintergrundfarbe übermalen.
Nicht sehr performant, aber funktioniert ungefähr so.
Bedingung ob ausserhalb des Kreises :
(x-x0)^2 + (y-y0)^2 > r^2
Wobei x0, y0 den Mittelpunkt des Kreises beschreibt, und r den Radius.
also bsw.
x0 := image1.width div 2;
y0 := image1.Height div 2;
r := x0;
MfG
Kolbaschedder
|