ITabCellStyle.Hyperlink

Синтаксис

Hyperlink: ITabHyperlink;

Описание

Свойство Hyperlink определяет параметры гиперссылки в ячейке, реализуемые интерфейсом ITabHyperlink.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента ReportBox и компонента UiReport с наименованием «UiReport1». «UiReport1» является источником данных для компонента ReportBox. К «UiReport1» подключен какой-либо регламентный отчет, содержащий несколько страниц.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    TSheet: ITabSheet;
    TRange: ITabRange;
    Style: ITabCellStyle;
    Hyperlink: ITabHyperlink;
Begin
    TSheet := ((UiReport1.Instance As IPrxReport).ActiveSheet As IPrxTable).TabSheet;
    TRange := TSheet.Cell(0, 0);
    Style := TRange.Style;
    Hyperlink := Style.Hyperlink;
    Hyperlink.Action := "=Лист2";
    Hyperlink.Enable := TriState.OnOption;
    Hyperlink.SeparateLinkText := TriState.OnOption;
    Hyperlink.Text := "Перейти на Лист2";
End Sub Button1OnClick;

При нажатии на кнопку в ячейке «А0» активного листа регламентного отчета будет создана гиперссылка. Текст гиперссылки «Перейти на Лист2». При нажатии на данную гиперссылку будет осуществляться переход на страницу регламентного отчета с наименованием «Лист2».

См. также:

ITabCellStyle