Delphi的绘制一个闭合矩形的两个圆角和矩形角

Question

怎样绘制，其具有两个圆角和所述相对的角是矩形的角部的矩形。该形状必须关闭，以便可以用刷子颜色填充。 Polyline方法不绘制曲线。我可以将弧的点添加到多段线点吗？我尝试使用画布方法，然后绘制ROUNDRECT，重叠在下部圆角的矩形，但我无法弄清楚如何drawign形状只是边境时没有填写其删除矩形的上线。注意：如果您认为相关，我可以添加我使用的代码。

样品所需的形状：

样的东西我用Delphi有：

Answer 1

您不必在同一时间，以填补你的形状画出来。您可以使用一系列TCanvas.LineTo()和TCanvas.ArcTo()/TCanvas.AngleArc()调用首先创建的形状，然后事后致电TCanvas.FloodFill()来填补它。

否则，您可以对TCanvas.RoundRect()具有相同的填充颜色顶部重叠TCanvas.Rectangle()，然后用TCanvas.MoveTo()/TCanvas.LineTo()绘制在用相同的填充颜色的分界线。

另一种选择是使用TCanvas绘图方法忘记，只使用Win32 API调用来代替。使用CreateRoundRectRgn()，CreateRectRgn()和CombineRn()创建一个HRGN有你想要的形状，然后用FillRgn()和FrameRgn()使用HRGN您TCanvas画。