更改GMLib默认标记

Question

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

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

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

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

我得到了一个错误“超出范围的论点”

是否可以更改默认图标而不向标记添加项？还是我做错了？

Answer 1

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