Найдено 28 результатов

Alex54
07 июн 2015, 09:04
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

Про блок-схемы алгоритмов - это конечно сильно )
А вот схема иерархии классов (интерфейсов) программы с указанием их назначения и функций бы не помешала ))
Alex54
14 апр 2015, 03:52
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

Вы не путайте. OnPrepareSubset вызывается в отдельном потоке после уведомления того о том что изменение было. Это уведомление выполняется в TVectorItemSubsetChangeableForMarksLayer.OnPosChange и TVectorItemSubsetChangeableForMarksLayer.OnMarksDbChange, а эти методы подвешены листенерами на события ...
Alex54
13 апр 2015, 17:46
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

Доброго времени!
Есть такой замечательный класс TVectorItemSubsetChangeableForMarksLayer, который формирует множество маркеров, которые будут отображены. При любом внешнем воздействии на карту вызывается TVectorItemSubsetChangeableForMarksLayer.GetMarksSubset (или сразу OnPrepareSubset), который и ...
Alex54
25 мар 2015, 21:10
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

Недоступно, только функцию напрямую видит
Может вы переменную объявили не как интерфейс, а как класс?
Переделал через интерфейс, все верно говорите )

Подскажите еще по настройкам -
Это настройка параметров трека

ITrackColorerConfig = interface(IConfigDataElement)
['{46E030C7-F9E1-45F5-914E ...
Alex54
25 мар 2015, 20:48
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

Подскажите еще по настройкам - это настройка параметров трека

ITrackColorerConfig = interface(IConfigDataElement)
['{46E030C7-F9E1-45F5-914E-20B240238261}']
function GetStatic: ITrackColorerStatic;

function GetSpeedRangeCount: Integer;

function GetSpeedRangeItem(AIndex: Integer ...
Alex54
25 мар 2015, 20:42
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

У вас там ахинея какая-то написана:
TCustomGPSTrack = class(TChangeableWithSimpleLockBase, IChangeable)
но TChangeableWithSimpleLockBase итак уже наследует интерфейс IChangeable через TChangeableBase.
Спасибо, убрал тавтологию, Вы правы.
Нет, там свойство
Недоступно, только функцию напрямую ...
Alex54
25 мар 2015, 20:29
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

zed писал(а):
Alex54 писал(а):ума не приложу...
Вам в сообщении компилятора что-то не понятно? У данной переменной нет свойства ChangeNotifier.
Очень извиняюсь, там же функция GetChangeNotifier(), конечно, разобрался, сразу не заметил ))
Alex54
25 мар 2015, 20:17
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

zed писал(а):
Alex54 писал(а):Компилятор ругается на ChangeNotifier
Как ругается-то?
[dcc32 Error] E2003 Undeclared identifier: 'ChangeNotifier'
ума не приложу...
Alex54
25 мар 2015, 19:59
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

vdemidov писал(а):Вероятно вы интерфейс не отнаследовали от IChangeable
Нет, сразу добавил его -

Код: Выделить всё

type TCustomGPSTrack = class(TChangeableWithSimpleLockBase, IChangeable)
Туплю где-то (
Alex54
25 мар 2015, 19:49
Форум: Раздел для разработчиков программы SAS.Планета
Тема: Вопросы по исходному коду
Ответы: 255
Просмотры: 238583

Re: Вопросы по исходному коду

Правильно. Возможно вы ненароком удалили подписку на уведомление об этом событии. Выглядит она так:
LinksList.Add(
TNotifyNoMmgEventListener.Create(Self.OnGPSRecorderChange),
FGPSRecorder.ChangeNotifier
);

В точку )
Компилятор ругается на ChangeNotifier (хотя мой кастомный TCustomGPSRecorder ...

Перейти к расширенному поиску