IPrxDataIsland.BeginDrill

Синтаксис

BeginDrill: IPrxDrillCellResult;

Описание

Метод BeginDrill позволяет получить значение ячейки области данных из матрицы среза с возможностью подмены координаты. Также может быть получена информация о привязке ячейки к источнику, для которого настроена множественная отметка в фиксированных измерениях.

Пример

Модуль для регламентного отчета, используемый в качестве обработчика событий, должен содержать приведенный ниже код: действия, происходящие после вычисления области данных регламентного отчета. В регламентном отчете должна быть область данных, построенная на срезе.

Public Sub OnAfterExecuteDataIsland(DataIsland: IPrxDataIsland);
Var
    pt: IPrxTable;
    t: ITabSheet;
    dcr: IPrxDrillCellResult;
    dr: ITabRange;
    i, j: integer;
    m: IMatrix;
    v: variant;
Begin
    m:= DataIsland.Slice.Matrix As IMatrix;
    pt:= DataIsland.Sheet As IPrxTable;
    t:= pt.TabSheet;
    dr:= DataIsland.DataRange;
    dcr:= DataIsland.BeginDrill;
    t.BeginUpdate;
    For i:= dr.Top To dr.Bottom Do
        For j:= dr.Left To dr.Right Do
            If Not dcr.Drill(i, j) Then
            Continue;
            End If;
            //подменяем координату: 2 - это индекс измерения в источнике; 1 - это индекс элемента в измерении. 
            dcr.coord.Item(2) := 1;
            v:= m.Item(dcr.coord);
            t.Cell(i, j).Style.Hint := v As string;
        End For;
    End For;
    t.EndUpdate;
End Sub OnAfterExecuteDataIsland;    

После вычисления области данных для ячеек, отображающих данные, будет выводиться всплывающая подсказка со значением для второго элемента (индекс=1) заданного измерения (индекс=2). Подсказка не будет отображена, если второй элемент (индекс=1) не был отмечен в измерении.

См. также:

IPrxDataIsland