Type | Description | |||
Group as Group | A Group object where user clicks a hyper link cell. | |||
Item as HITEM | A long expression that indicates the item's handle. | |||
ColIndex as Long | A long expression that indicates the column's index. |
private void HyperLinkClick(object sender,exontrol.EXPLORERTREELib.Group Group,int Item,int ColIndex) { } Private Sub HyperLinkClick(ByVal sender As System.Object,ByVal Group As exontrol.EXPLORERTREELib.Group,ByVal Item As Integer,ByVal ColIndex As Integer) Handles HyperLinkClick End Sub |
private void HyperLinkClick(object sender, AxEXPLORERTREELib._IExplorerTreeEvents_HyperLinkClickEvent e) { } void OnHyperLinkClick(LPDISPATCH Group,long Item,long ColIndex) { } void __fastcall HyperLinkClick(TObject *Sender,Explorertreelib_tlb::IGroup *Group,Explorertreelib_tlb::HITEM Item,long ColIndex) { } procedure HyperLinkClick(ASender: TObject; Group : IGroup;Item : HITEM;ColIndex : Integer); begin end; procedure HyperLinkClick(sender: System.Object; e: AxEXPLORERTREELib._IExplorerTreeEvents_HyperLinkClickEvent); begin end; begin event HyperLinkClick(oleobject Group,long Item,long ColIndex) end event HyperLinkClick Private Sub HyperLinkClick(ByVal sender As System.Object, ByVal e As AxEXPLORERTREELib._IExplorerTreeEvents_HyperLinkClickEvent) Handles HyperLinkClick End Sub Private Sub HyperLinkClick(ByVal Group As EXPLORERTREELibCtl.IGroup,ByVal Item As EXPLORERTREELibCtl.HITEM,ByVal ColIndex As Long) End Sub Private Sub HyperLinkClick(ByVal Group As Object,ByVal Item As Long,ByVal ColIndex As Long) End Sub LPARAMETERS Group,Item,ColIndex PROCEDURE OnHyperLinkClick(oExplorerTree,Group,Item,ColIndex) RETURN |
<SCRIPT EVENT="HyperLinkClick(Group,Item,ColIndex)" LANGUAGE="JScript"> </SCRIPT> <SCRIPT LANGUAGE="VBScript"> Function HyperLinkClick(Group,Item,ColIndex) End Function </SCRIPT> Procedure OnComHyperLinkClick Variant llGroup HITEM llItem Integer llColIndex Forward Send OnComHyperLinkClick llGroup llItem llColIndex End_Procedure METHOD OCX_HyperLinkClick(Group,Item,ColIndex) CLASS MainDialog RETURN NIL void onEvent_HyperLinkClick(COM _Group,int _Item,int _ColIndex) { } function HyperLinkClick as v (Group as OLE::Exontrol.ExplorerTree.1::IGroup,Item as OLE::Exontrol.ExplorerTree.1::HITEM,ColIndex as N) end function function nativeObject_HyperLinkClick(Group,Item,ColIndex) return |
The following sample displays the caption of the clicked cell:
Private Sub ExplorerTree1_AddItem(ByVal Group As EXPLORERTREELibCtl.IGroup, ByVal Item As EXPLORERTREELibCtl.HITEM) Group.Items.CellHyperLink(Item, 0) = True End Sub Private Sub ExplorerTree1_HyperLinkClick(ByVal Group As EXPLORERTREELibCtl.IGroup, ByVal Item As EXPLORERTREELibCtl.HITEM, ByVal ColIndex As Long) Debug.Print Group.Items.CellCaption(Item, ColIndex) End Sub Private Sub Form_Load() With ExplorerTree1 With .Groups.Add("Group 1") .SelForeColor = .HyperLinkColor .SelBackColor = .BackColorList .PutItems Array("https://www.exontrol.com", "https://www.exontrol.net") End With End With End Sub