Изменения

Перейти к: навигация, поиск

Дополнительные возможности

1503 байта добавлено, 16:23, 21 ноября 2018
Настройка вида маркера
== Настройка вида маркера ==
Настройки находятся в "Отчеты" -> "Дополнительные возможности" - "Системные". <br />
 В функции передается объект Table2Map типа [[Руководство программиста#Объект TFieldObject|TFieldObject]]. Получить поля с примерами значений из него можно например так: showmessage(table2map._GETTABLEINFO)(текст большое сообщения можно скопировать в буфер комбинацией Ctrl-C). Для доступа к данным пользуйтесь только этим объектом, т.к. любое обращение к базе приведет к значительному снижению скорости работы. Так же текущее состояние окна карты доступно через переменные: $PlanDate - Выбранная дата, на которую планируется. $KurierCode - Код выделенного курьера. $MetroCode - Код выделенной станции метро (маршрута).  Обратите внимание, что все ошибки, возникающие при отрисовке, подавляются системой. Поэтому, если вы допустите ошибку в скрипте, он просто не будет работать, никаких сообщений вы не увидите. Для отладочных целей можно заменить ошибки на сообщения такой конструкцией:  set($s, try( error('вот тут ошибка, которую вы увидите в виде сообщения'); )); if($s, showmessage($s), '');   '''MapObjectFigure''' - Доп. возможность позволяет установить вид маркера на карте. Результат определяет фигуру: 1 - перевернутый треугольник, 2 - треугольник, 3 - увеличенный треугольник, чтобы квадрат не мог его перекрыть, 4 - квадрат, все остальное круг. В окружении доступен объект Table2Map, в формуле нужно использовать поля только этого объекта т.к. он вызывается при событии рисования, любое обращение к базе приведет к значительному замедлению.<br/>
Например:
if(table2map.zabor, 2, if(StrDateToFloat(table2map.DatePeriod) = $PlanDate, 3, 4))
'''MapObjectColor''' - Доп. возможность позволяет установить цвет маркера на карте.
При помощи данных параметров можно создать условия отображения маркеров.<br/>
 
Для доступа к настройкам доступны переменные:
 
$Color
 
$DefaultColor
 
$PlanedColor
 
$SelectedPlanedColor
 
$GetKurierColor
 
Например:
if((table2map.kurier<20)*(StrDateToFloat(table2map.DatePeriod) = $PlanDate), 16753920, $color)

Навигация