event FormatColumn (Group as Group, Item as HITEM, ColIndex as Long, ByRef Value as Variant)
Fired when a cell requires to format its caption.

TypeDescription
Group as Group A Group object where the cell needs to be formatted
Item as HITEM A long expression that indicates the handle of the item being formatted.
ColIndex as Long A long expression that indicates the index of the column being formatted.
Value as Variant (By Reference) A Variant value that indicates the value being formatted. By default, the Value parameter has the CellCaption value.
The FormatColumn event is fired only if the FireFormatColumn property of the Column object is True. The FormatColumn event lets the user provides the cell's caption before it being displayed on the group's list. For instance, the FormatColumn event is very useful when the column cells contains prices( numbers ), and you want to display that column formatted as currency, like $50 instead 50.

Syntax for FormatColumn event, /NET version, on:

private void FormatColumn(object sender,exontrol.EXPLORERTREELib.Group Group,int Item,int ColIndex,ref object Value)
{
}

Private Sub FormatColumn(ByVal sender As System.Object,ByVal Group As exontrol.EXPLORERTREELib.Group,ByVal Item As Integer,ByVal ColIndex As Integer,ByRef Value As Object) Handles FormatColumn
End Sub

Syntax for FormatColumn event, /COM version, on:

private void FormatColumn(object sender, AxEXPLORERTREELib._IExplorerTreeEvents_FormatColumnEvent e)
{
}

void OnFormatColumn(LPDISPATCH Group,long Item,long ColIndex,VARIANT FAR* Value)
{
}

void __fastcall FormatColumn(TObject *Sender,Explorertreelib_tlb::IGroup *Group,Explorertreelib_tlb::HITEM Item,long ColIndex,Variant * Value)
{
}

procedure FormatColumn(ASender: TObject; Group : IGroup;Item : HITEM;ColIndex : Integer;var Value : OleVariant);
begin
end;

procedure FormatColumn(sender: System.Object; e: AxEXPLORERTREELib._IExplorerTreeEvents_FormatColumnEvent);
begin
end;

begin event FormatColumn(oleobject Group,long Item,long ColIndex,any Value)
end event FormatColumn

Private Sub FormatColumn(ByVal sender As System.Object, ByVal e As AxEXPLORERTREELib._IExplorerTreeEvents_FormatColumnEvent) Handles FormatColumn
End Sub

Private Sub FormatColumn(ByVal Group As EXPLORERTREELibCtl.IGroup,ByVal Item As EXPLORERTREELibCtl.HITEM,ByVal ColIndex As Long,Value As Variant)
End Sub

Private Sub FormatColumn(ByVal Group As Object,ByVal Item As Long,ByVal ColIndex As Long,Value As Variant)
End Sub

LPARAMETERS Group,Item,ColIndex,Value

PROCEDURE OnFormatColumn(oExplorerTree,Group,Item,ColIndex,Value)
RETURN

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

<SCRIPT EVENT="FormatColumn(Group,Item,ColIndex,Value)" LANGUAGE="JScript">
</SCRIPT>

<SCRIPT LANGUAGE="VBScript">
Function FormatColumn(Group,Item,ColIndex,Value)
End Function
</SCRIPT>

Procedure OnComFormatColumn Variant llGroup HITEM llItem Integer llColIndex Variant llValue
	Forward Send OnComFormatColumn llGroup llItem llColIndex llValue
End_Procedure

METHOD OCX_FormatColumn(Group,Item,ColIndex,Value) CLASS MainDialog
RETURN NIL

void onEvent_FormatColumn(COM _Group,int _Item,int _ColIndex,COMVariant /*variant*/ _Value)
{
}

function FormatColumn as v (Group as OLE::Exontrol.ExplorerTree.1::IGroup,Item as OLE::Exontrol.ExplorerTree.1::HITEM,ColIndex as N,Value as A)
end function

function nativeObject_FormatColumn(Group,Item,ColIndex,Value)
return

The following sample uses the FormatCurrency function provided by the VB to display numbers as currency:

Private Sub ExplorerTree1_FormatColumn(ByVal Group As EXPLORERTREELibCtl.IGroup, ByVal Item As EXPLORERTREELibCtl.HITEM, ByVal ColIndex As Long, Value As Variant)
    Value = FormatCurrency(Value)
End Sub


Private Sub Form_Load()
    With ExplorerTree1
        With .Groups.Add("Group 1")
            .BeginUpdate
                With .Columns(0)
                    .FireFormatColumn = True
                End With
                .PutItems Array(10, 20, 30, 40)
            .EndUpdate
        End With
    End With
End Sub