Retrieves or sets a value indicating whether the cell has associated a radio button
or
not.
Type | Description | |||
Item as Variant | A long expression that indicates the item's handle. | |||
ColIndex as Variant | A long expression that indicates the column's index, a string expression that indicates the column's caption or the column's key. | |||
Boolean | A boolean expression that indicates whether the cell contains a radio button. |
Retrieves or sets a value indicating whether the cell has associated a radio button or not. To change the state for a radio cell you have to use CellState property. The cell cannot display in the same time a radio and a check button. The control fires CellStateChanged event when the cell's state has been changed. To set the cell of check type you have call CellHasCheckBox property. To add or remove a cell to a given radio group you have to use CellRadioGroup property. Use the Def property to assign radio buttons for all cells in the column. Use the CellImage property to add a single icon to a cell. Use the CellImages property to assign multiple icons to a cell. Use the CellPicture property to load a custom size picture to a cell. Use the RadioImage property to change the radio button appearance. Use the Def(exCellDrawPartsOrder) property to change the positions of drawing elements in the cell.
The following VB sample sets the radio type for all cells in the first column, and group all of them in the same radio group ( 1234 ):
Dim h As Variant G2antt1.BeginUpdate With G2antt1.Items For Each h In G2antt1.Items .CellHasRadioButton(h, 0) = True .CellRadioGroup(h, 0) = 1234 Next End With G2antt1.EndUpdate
or
Private Sub G2antt1_AddItem(ByVal Item As EXG2ANTTLibCtl.HITEM) G2antt1.Items.CellHasRadioButton(Item, 0) = True G2antt1.Items.CellRadioGroup(Item, 0) = 1234 End Sub
To find out the radio cell that is checked in the radio group 1234 you have to call: MsgBox G2antt1.Items.CellValue(, G2antt1.Items.CellChecked(1234))
The following sample group all cells of the first column into a radio group, and display the cell's checked on the radio group when the state of a radio group has been changed:
Private Sub G2antt1_AddItem(ByVal Item As EXG2ANTTLibCtl.HITEM) G2antt1.Items.CellHasRadioButton(Item, 0) = True G2antt1.Items.CellRadioGroup(Item, 0) = 1234 ' The 1234 is arbirary and it represents the identifier for the radio group End Sub Private Sub G2antt1_CellStateChanged(ByVal Item As EXG2ANTTLibCtl.HITEM, ByVal ColIndex As Long) Debug.Print "In the 1234 radio group the """ & G2antt1.Items.CellValue(, G2antt1.Items.CellChecked(1234)) & """ is checked." End Sub
The following VB sample assigns a radio button to the focused cell:
With G2antt1.Items .CellHasRadioButton(.FocusItem, 0) = True .CellRadioGroup(.FocusItem, 0) = 1234 End With
The following C++ sample assigns a radio button to the focused cell:
#include "Items.h" CItems items = m_g2antt.GetItems(); items.SetCellHasRadioButton( COleVariant( items.GetFocusItem() ), COleVariant( (long)0 ), TRUE ); items.SetCellRadioGroup( COleVariant( items.GetFocusItem() ), COleVariant( (long)0 ), 1234 );
The following VB.NET sample assigns a radio button to the focused cell:
With AxG2antt1.Items .CellHasRadioButton(.FocusItem, 0) = True .CellRadioGroup(.FocusItem, 0) = 1234 End With
The following C# sample assigns a radio button to the focused cell:
axG2antt1.Items.set_CellHasRadioButton(axG2antt1.Items.FocusItem, 0, true); axG2antt1.Items.set_CellRadioGroup(axG2antt1.Items.FocusItem, 0, 1234);
The following VFP sample assigns a radio button to the focused cell:
with thisform.G2antt1.Items .DefaultItem = .FocusItem .CellHasRadioButton(0,0) = .t. .CellRadioGroup(0,0) = 1234 endwith
Note: A cell is the intersection of an item with a column. All properties that has an Item and a ColIndex parameters are referring to a cell. The Item parameter represents the handle of an item, and the ColIndex parameter indicates an index ( a numerical value, see Column.Index property ) of a column , the column's caption ( a string value, see Column.Caption property ), or a handle to a cell. Here's few hints how to use properties with Item and ColIndex parameters:
G2antt1.Items.CellBold(, G2antt1.Items.ItemCell(G2antt1.Items(0), 0)) = True
G2antt1.Items.CellBold(G2antt1.Items(0), 0) = True
G2antt1.Items.CellBold(G2antt1.Items(0), "ColumnName") = True