更改 GMLib 默认标记答案

【问题标题】：Change GMLib default marker更改 GMLib 默认标记
【发布时间】：2015-01-02 02:50:38
【问题描述】：

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

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

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

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

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

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

【问题讨论】：

【解决方案1】：

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

【讨论】：

做到了，谢谢。我添加了一个变量标记（int）并添加了代码：markers:=gmmarker1.Count;对于标记 := 0 到标记 -1 开始 gmmarker1.Items[markers].Icon:='c:\fdms\measle.png';结束;