event CellImageClick (Item as HITEM, ColIndex as Long)

Occurs when the user clicks the cell's icon.

 TypeDescription 
   Item as HITEM A long expression that indicates the handle of the item where the user clicks the cell's icon.  
   ColIndex as Long A long expression that indicates the index of the column where the user clicks the cell's icon, or a long  expression that indicates the handle of the cell being clicked, if the Item parameter is 0.  

The CellImageClick event is fired when user clicks on the cell's image. Use the CellImage property to assign an icon to a cell. Use the CellImages property to assign multiple icons to a cell. Use the ItemFromPoint property to determine the index of the icon being clicked, in case the cell displays multiple icons using the CellImages property. Use the CellHasCheckBox or CellHasRadioButton property to assign a check box or a radio button to a cell.

Syntax for CellImageClick event, /NET version, on:

private void CellImageClick(object sender,int Item,int ColIndex)
{
}

Private Sub CellImageClick(ByVal sender As System.Object,ByVal Item As Integer,ByVal ColIndex As Integer) Handles CellImageClick
End Sub

Syntax for CellImageClick event, /COM version, on:

private void CellImageClick(object sender, AxEXG2ANTTLib._IG2anttEvents_CellImageClickEvent e)
{
}

void OnCellImageClick(long Item,long ColIndex)
{
}

void __fastcall CellImageClick(TObject *Sender,Exg2anttlib_tlb::HITEM Item,long ColIndex)
{
}

procedure CellImageClick(ASender: TObject; Item : HITEM;ColIndex : Integer);
begin
end;

procedure CellImageClick(sender: System.Object; e: AxEXG2ANTTLib._IG2anttEvents_CellImageClickEvent);
begin
end;

begin event CellImageClick(long Item,long ColIndex)
end event CellImageClick

Private Sub CellImageClick(ByVal sender As System.Object, ByVal e As AxEXG2ANTTLib._IG2anttEvents_CellImageClickEvent) Handles CellImageClick
End Sub

Private Sub CellImageClick(ByVal Item As EXG2ANTTLibCtl.HITEM,ByVal ColIndex As Long)
End Sub

Private Sub CellImageClick(ByVal Item As Long,ByVal ColIndex As Long)
End Sub

LPARAMETERS Item,ColIndex

PROCEDURE OnCellImageClick(oG2antt,Item,ColIndex)
RETURN

Syntax for CellImageClick event, /COM version (others), on:

<SCRIPT EVENT="CellImageClick(Item,ColIndex)" LANGUAGE="JScript">
</SCRIPT>

<SCRIPT LANGUAGE="VBScript">
Function CellImageClick(Item,ColIndex)
End Function
</SCRIPT>

Procedure OnComCellImageClick HITEM llItem Integer llColIndex
	Forward Send OnComCellImageClick llItem llColIndex
End_Procedure

METHOD OCX_CellImageClick(Item,ColIndex) CLASS MainDialog
RETURN NIL

void onEvent_CellImageClick(int _Item,int _ColIndex)
{
}

function CellImageClick as v (Item as OLE::Exontrol.G2antt.1::HITEM,ColIndex as N)
end function

function nativeObject_CellImageClick(Item,ColIndex)
return

The following VB sample assigns an icon to each cell that's added, and changes the cell's icon when the user clicks the icon:

Private Sub G2antt1_AddItem(ByVal Item As EXG2ANTTLibCtl.HITEM)
    G2antt1.Items.CellImage(Item, 0) = 1
End Sub

Private Sub G2antt1_CellImageClick(ByVal Item As EXG2ANTTLibCtl.HITEM, ByVal ColIndex As Long)
    G2antt1.Items.CellImage(Item, ColIndex) = G2antt1.Items.CellImage(Item, ColIndex) Mod 2 + 1
End Sub

The following VB sample displays the index of icon being clicked:

Private Sub G2antt1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Dim i As HITEM, h As HitTestInfoEnum, c As Long
    With G2antt1
        i = .ItemFromPoint(X / Screen.TwipsPerPixelX, Y / Screen.TwipsPerPixelY, c, h)
    End With
    If (i <> 0) or ( c <> 0 ) Then
        If exHTCellIcon = (h And exHTCellIcon) Then
            Debug.Print "The index of icon being clicked is: " & (h And &HFFFF0000) / 65536
        End If
    End If
End Sub

The following C++ sample changes the cell's icon being clicked:

#include "Items.h"
void OnCellImageClickG2antt1(long Item, long ColIndex) 
{
	CItems items = m_g2antt.GetItems();
	COleVariant vtItem( Item ), vtColumn( ColIndex );
	items.SetCellImage( vtItem , vtColumn , items.GetCellImage( vtItem, vtColumn ) % 2 + 1 );
}

The following C# sample changes the cell's icon being clicked:

private void axG2antt1_CellImageClick(object sender, AxEXG2ANTTLib._IG2anttEvents_CellImageClickEvent e)
{
	axG2antt1.Items.set_CellImage( e.item, e.colIndex, axG2antt1.Items.get_CellImage( e.item, e.colIndex ) % 2 + 1 );
}

The following VB/NET sample changes the cell's icon being clicked:

Private Sub AxG2antt1_CellImageClick(ByVal sender As Object, ByVal e As AxEXG2ANTTLib._IG2anttEvents_CellImageClickEvent) Handles AxG2antt1.CellImageClick
	With AxG2antt1.Items
		.CellImage(e.item, e.colIndex) = .CellImage(e.item, e.colIndex) Mod 2 + 1
	End With
End Sub

The following VFP sample changes the cell's icon being clicked:

*** ActiveX Control Event ***
LPARAMETERS item, colindex

with thisform.G2antt1.Items
	.DefaultItem = item
	.CellImage( 0,colindex ) = .CellImage( 0,colindex ) + 1
endwith

 


Send comments on this topic.
1999-2017 Exontrol.COM, Software. All rights reserved.