如何将 TBitmap 分配给 TPath.Data答案

【问题标题】：How to Assign a TBitmap to a TPath.Data如何将 TBitmap 分配给 TPath.Data
【发布时间】：2020-09-19 11:27:37
【问题描述】：

我想从 TBitmap 填充 TPath.Data。

Image1.Bitmap.Canvas.FillPath(path, 200);

但我正在寻找从位图中填充路径数据。

任何代码示例？ tia

【问题讨论】：

这不正是您的代码行已经在做的吗？
@Matthias。不，根据示例提供的链接：- procedure TForm3.RadioButton13Click(Sender: TObject); // 在画布上填充并绘制路径
不清楚你想要什么——你已经有例子了。
如前所述。 Image1.Bitmap.Canvas.FillPath(path, 200); 的反面
为了从位图中填充路径数据，您需要对位图进行矢量化。由于这是一个相当复杂的过程，甚至可能需要手动调整，因此在 Delphi 中没有自动的方法来做到这一点。

【解决方案1】：

您的意思是如何用位图而不是纯色填充封闭的 TPath。您将 Fill 属性更改为位图：

path1.Fill.Bitmap:=mybitmap;
path1.Fill.Kind:=TBrushKind.Bitmap;

【讨论】：

嗨，道格。使用 path1.Fill.Bitmap:=mybitmap; Path1.Data 仍然是空的。即如果 Path1.Data.IsEmpty 然后 ShowMessage('Path Data is Empty'); Path1.Data 是我试图从位图填充然后重新分配的内容。谢谢
从位图填充 Path1.Data 没有意义。 Path.Data 是一系列点。位图没有点。除非你有一些图像识别软件可以识别房子的图片并从中提取点。