如何使用Delphi和Firemonkey绘制一个中间有透明圆孔的蓝色正方形,如下图所示?
我想画这样的东西:
但我找不到使圆圈透明的方法:(
最佳答案
像这样的事情应该这样做:
var lPath: TPathData;
begin
lPath := TPathData.Create;
lPath.AddRectangle(RectF(0,0,100,100), 0,0, []);
lPath.AddEllipse(RectF(20,20,80,80));
Canvas.Fill.Color := $FF8080FF;
Canvas.FillPath(lPath,1);
lPath.Free;
end;
关于delphi - 如何画一个有洞的形状?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/45554530/