Text: String;
The Text property determines the hyperlink text. It is used together with the ITabHyperlink.SeparateLinkText property.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Rep: IPrxReport;
Tab: ITabSheet;
Range: ITabRange;
Hyperlink: ITabHyperlink;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("Reg_rep").Edit;
Rep := MObj As IPrxReport;
Tab := Rep.ActiveSheet.Table;
Range := Tab.Cell(0, 0);
Hyperlink := Range.Style.Hyperlink;
Hyperlink.Action := "=Sheet2";
Hyperlink.Enable := TriState.OnOption;
Hyperlink.SeparateLinkText := TriState.OnOption;
Hyperlink.Text := "Goto_List2";
MObj.Save;
End Sub Main;
As a result in the "A0" cell of the regular report a hyperlink will be created with the text "Goto_Sheet2", clicking on which will result in going to "Sheet2".
See also: