Action: String;
Свойство устарело. Используйте вместо него IPrxDimensionDrill.ActionType.
Свойство Action определяет действие, производимое при срабатывании гиперссылки.
Действие |
Пример значения свойства |
Открытие файла зарегистрированным приложением |
"C:\Image.jpg" Будет открыт указанный файл. |
Открытие адреса URL в браузере |
"http://www.prognoz.ru" Будет открыт указанный адрес. |
Переход на лист отчета |
"=Лист2" Будет осуществлен переход на заданный лист отчета. |
Позиционирование на диапазон ячеек |
"=a0:b3;d0:f3" Будет осуществлено позиционирование на указанном диапазоне. |
Позиционирование объекта в центре экрана |
"#Лист2!PrxChart1" Будет осуществлено позиционирование на диаграмме, которая расположена на втором листе отчета. |
Открытие объекта навигатора |
"@Dim" Будет открыт объект с идентификатором «Dim». |
Выполнение макроса |
"OBJ34114.MyFunction" Будет выполнена функция «MyFunction», содержащаяся в модуле с идентификатором «OBJ34114». |
В рассматриваемом примере предполагается существование объекта Report типа IPrxReport.
Sub UserProc;
Var
Report : IPrxReport;
DI : IPrxDataIsland;
DIC : IPrxDataIslandDimensionCommon;
Drill : IPrxDimensionDrill;
DimMode : IPrxSliceDimension;
Dim : IDimensionModel;
Begin
DI := Report.DataIslands.FindById("DATAISLAND").Edit;
Dim := DI.Slice.Dimensions.FindById("D_TO").Dimension.Dimension;
DIC := DI.Properties.Dimension(Dim);
DIC.Drilled := TriState.OnOption;
Drill := DIC.Drill;
Drill.Mode := PrxDataDrillMode.Replace;
DimMode := Report.DataSources.Item(0).Slices.Item(1).Dimensions.FindById("D_TO1");
Drill.Dimension := DimMode;
Drill.Index := DimMode.Dimension.Dimension.Indexes.PrimaryIndex;
Drill.Attribute := Dim.Attributes.Id;
Drill.Sheet := Null;
Drill.Action := "#Лист2!PrxChart1";
DI.Save;
End Sub UserProc;
После выполнения примера для области данных будет настроена расшифровка. При нажатии на гиперссылку будет производиться позиционирование на диаграмме, которая расположена на втором листе отчета.
См. также: