2015-01-02 1 views
1

Я использую gmlib в приложении delphi, и он соответствует моим потребностям. Я загружаю маркеры из таблицы координат, но теперь я хочу заменить стиль маркера по умолчанию. Поскольку я делаю все это в коде, у меня нет элементов gmmarker. Мой код зацикливается просто:Изменить маркер по умолчанию GMLib

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

, когда я пытаюсь изменить значок с помощью:

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

Я получаю сообщение об ошибке «Аргумент вне диапазона»

Можно ли изменить значение по умолчанию значок без добавления элемента в маркер? Или я делаю это неправильно?

ответ

1

Метод добавления TGMMarker возвращает объект TMarker. Вы можете использовать его для назначения дополнительных свойств, таких как свойство Icon. Однако gmmarker1.Items [0] .Icon или gmmarker1 [0] .Icon должен работать, если существует какой-либо маркер. Проверить gmmarker1.Count до

+0

Это сделало, спасибо. Я добавил переменную, markers (int) и добавил код: markers: = gmmarker1.Count; для маркеров: = 0 для маркеров -1 do начало gmmarker1.Items [markers] .Icon: = 'c: \ fdms \ measle.png'; конец; –