SelectionBorderPen: IGxPenBase;
SelectionBorderPen: Prognoz.Platform.Interop.Drawing.IGxPenBase;
Свойство SelectionBorderPen определяет параметры рамки выделения.
Для определения, используется ли щелчок кнопкой мыши для выделения родительских элементов, используйте свойство IVZTreeMap.UseSelectOnClick.
Для выполнения примера предполагается наличие экспресс-отчета с идентификатором «EXPRESS». В экспресс-отчете настроено отображение визуализатора «Плоское дерево».
Добавьте ссылки на системные сборки Metabase, Express, Visualizators, Drawing.
Sub UserProc;
Var
MB: IMetabase;
EaxAnalyzer: IEaxAnalyzer;
TreeMap: IVZTreeMap;
Begin
MB := MetabaseClass.Active;
EaxAnalyzer := MB.ItemById("EXPRESS").Edit As IEaxAnalyzer;
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
TreeMap.UseSelectOnClick := True;
// Установим параметры рамки выделения
TreeMap.SelectionBorderPen.Color := New GxColor.CreateRGB(65, 105, 225);
// Сохраним экспресс-отчет
(EaxAnalyzer As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Visualizators;
Imports Prognoz.Platform.Interop.Drawing;
…
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
EaxAnalyzer: IEaxAnalyzer;
TreeMap: IVZTreeMap;
Color: GxColor;
Begin
MB := Params.Metabase;
EaxAnalyzer := MB.ItemById["EXPRESS"].Edit() As IEaxAnalyzer;
TreeMap := EaxAnalyzer.TreeMap.TreeMap;
TreeMap.UseSelectOnClick := True;
// Установим параметры рамки выделения
Color := New GxColor();
Color.CreateRGB(65, 105, 225);
TreeMap.SelectionBorderPen.Color := Color;
// Сохраним экспресс-отчет
(EaxAnalyzer As IMetabaseObject).Save();
End Sub;
См. также: