delphi - 更改 GMLib 默认标记

Question

我在 delphi 应用程序中使用 gmlib，它可以满足我的需求。我从坐标表中加载标记，但现在我想替换默认标记样式。因为我是在代码中完成这一切，所以我没有任何 gmmarker 项目。我的代码很简单：

gmmarker1.Add(qryPoints.FieldByName('lat').AsFloat,qryPoints.FieldByName('lon').AsFloat,address);

当我尝试使用以下方法更改图标时：

gmmarker1.Items[0].Icon:='c:\measle.png';

我收到错误“参数超出范围”

是否可以在不向标记添加项目的情况下更改默认图标？还是我做错了？

score 1 · Accepted Answer

TGMMarker 的 Add 方法返回一个 TMarker 对象。您可以使用它来分配更多属性，例如 Icon 属性。但是，如果存在任何标记，则 gmmarker1.Items[0].Icon 或 gmmarker1[0].Icon 必须有效。之前检查 gmmarker1.Count

1 回答 1