ctlUniGrid ControlAdvanced Unicode grid
|
Name | Description |
---|---|
eUniGrid_ColumnAlign | Column alignment constants |
eUniGrid_ColumnType | Column type constants |
Name | Description |
---|---|
Click | |
DblClick | |
KeyDown | |
KeyPress | |
KeyUp | |
MouseDown | MouseDown event |
MouseMove | MouseMove event |
MouseUp | MouseUp event |
MouseWheel | MouseWheel event |
SelectionChange | Occurs when a new row is selected |
VScroll | |
HScroll | |
ColumnClick | Raised when a column header is being clicked |
OLEStartDrag | |
OLESetData | |
OLEGiveFeedback | |
OLEDragOver | |
OLEDragDrop | |
OLECompleteDrag | |
SortCompareRows | Raised if you chose to sort a column using a custom event |
OnOwnerDrawPicture | Raised before measuring or drawing a cell, permits you to assign a picture to a cell on the fly |
Name | Type | Description |
---|---|---|
AllowMultiLineText | (Boolean) | Permits you to use multiline text in grid cells |
BackColor | (OLE_COLOR) | Gets or sets the Background color of the control |
BorderColor | (OLE_COLOR) | Gets or sets the Border color |
CellBackColor | (Long) | Gets or sets the background color of the passed cell |
CellForeColor | (Long) | Gets or sets the text color for the passed cell |
CellHeight | (Long) | Returns the height of the given cell |
CellHorizBorder | (Boolean) | Gets or sets the ability to show the horizontal border of cells |
CellsBorderColor | (OLE_COLOR) | Gets or sets the border color of cells |
CellTag | (Variant) | Gets or sets the tag of the given cell |
CellValue | (Variant) | Gets or sets the cell value of the given row/col |
CellVerticalBorder | (Boolean) | Gets or sets the ability to show vertical border of cells |
Col | (Long) | Gets or sets the current column |
ColAlign | (eUniGrid_ColumnAlign) | Gets or sets the column data alignment (not for the header title) |
ColAllowEmptyNumbers | (Boolean) | Gets or sets the ability to accept blank strings as value for numeric columns |
ColHeaderAlign | (eUniGrid_ColumnAlign) | Gets or sets the column title alignment |
ColKey | (Variant) | Returns the key of the given column |
ColResizable | (Boolean) | Gets or sets the ability to resize a certain column with the mouse |
ColRightToLeft | (Boolean) | Gets or sets the RTL support for the given column |
ColSortable | (Boolean) | Gets or sets the ability to sort the given column (by mouse) |
ColSortWithCustomEvent | (Boolean) | Gets or sets the ability to sort a certain column using a custom event |
ColText | (String) | Gets or sets the title of a certain column |
ColType | (eUniGrid_ColumnType) | Returns the column type |
ColWidth | (Long) | Gets or sets the width of a certain column |
CurrCellBackColor | (Long) | Gets or sets the background color of the given cell on the current row |
CurrCellForeColor | (Long) | Gets or sets the text color for the given cell on the current row |
CurrCellHeight | (Long) | Returns the height of the given cell on the current row |
CurrCellTag | (Variant) | Gets or sets the tag for the given cell on the current row |
CurrCellValue | (Variant) | Gets or sets the value of the cell in the given column on the current row |
Enabled | (Boolean) | Enables or disables the control |
FixedCols | (Integer) | Gets or sets the number of fixed columns, a fixed column never scrolls horizontally |
Font | (Font) | Gets or sets the font used for text in the control, check the [ApplyFontChanges] for details |
ForeColor | (OLE_COLOR) | Gets or sets the text color |
FullRowSelect | (Boolean) | Returns/sets whether selecting a column highlights the entire row. |
HeaderBackColor | (OLE_COLOR) | Gets or sets the background color of the header |
HeaderForeColor | (OLE_COLOR) | Gets or sets the text color of the header area |
HeaderStyle | (eCtlButtonStyle) | Gets or sets the style of the header |
HideColumnHeaders | (Boolean) | Returns/sets whether or not the control's column headers are hidden |
HScroll | (Object) | Returns a reference to the horizontal scrollbar (in case you want to customize it) |
HScroll_Max | (Long) | Gets the maximum value of the horizontal scrollbar |
HScroll_Value | (Long) | Gets or sets the value of the horizontal scrollbar |
hWnd | (Long) | Returns the usercontrol window handle |
MinRowHeight | (Integer) | Gets or sets the minimum row height |
MouseIcon | (Picture) | Gets or sets the MouseIcon for the control |
MousePointer | (VBRUN.MousePointerConstants) | Gets or sets the MousePointer for the control |
MultiSelect | (Boolean) | Gets or sets the ability to select multiple rows |
OLEDropMode | (eCtlOLEDropMode) | Gets or sets the OleDropMode for the control |
OwnerDrawState | (eOwnerDrawState) | Gets the OwnerDraw status, by checking this flag you can load items (icons or images) only when needed |
Row | (Long) | Gets or sets the current row |
Rows | (Long) | Gets or sets the number of rows in the grid |
RowSel | (Boolean) | Gets or sets the selection of a certain row |
ScrollOnMouseWheel | (Boolean) | Gets or sets the ability to capture the mouse wheel and scroll the view |
SelBackColor | (OLE_COLOR) | Gets or sets the background color of the list item selector |
SelectItemOnRightClick | (Boolean) | Permits the selection of items also when pressing the right mouse button (like the standard control) |
SelectorStyle | (eCtlButtonStyle) | Gets or sets the style of the row selector |
SelForeColor | (OLE_COLOR) | Gets or sets the foreground color of the list item selector |
ShowFocus | (Boolean) | If True, draws the focus rectangle when the control gains the keyboard focus |
StandardScrollBars | (Boolean) | Returns/sets whether or not the control uses standard or styled scrollbars |
Striped | (Boolean) | If True, uses a different background color for even and odd rows |
Tip | (String) | Gets or sets the Unicode Tooltip for the control |
VScroll | (Object) | Returns a reference to the vertical scrollbar (in case you want to customize it) |
VScroll_Max | (Long) | Gets the maximum value of the vertical scrollbar |
VScroll_Value | (Long) | Gets or sets the value of the vertical scrollbar |
Name | Type | Description |
---|---|---|
AddColumn | Adds a column to the list, at least one column must be added before using the list | |
AddRow | Adds a new row to the grid | |
ApplyFontChanges | When setting a new font on the control you need to call this function in order to refresh the interface | |
BeginUpdate | Permits you to start a long-time update on the control (for example by adding 1000 elements) without sending out many and many events. So it is faster! Use un conjunction with [EndUpdate] |
|
Clear | Clears the list and optionally the header | |
ColExists | (Boolean) | Checks if a certain column exists |
Cols | (Integer) | Returns the number of columns in the grid |
CountSelected | (Long) | Returns the number of selected items when using MultiSelection |
EndUpdate | Terminates a [BeginUpdate] reactivating the control after a long-time update | |
FocusSelectedRow | Focuses the selected row by scrolling if necessary | |
FormatNumber | (String) | Format a number using a specified format |
GetCellAbsRect | Returns the coordinates of the given cell | |
GetCellPicture | Gets picture information for the given cell | |
GetCellRect | Returns the coordinates of the given cell | |
GetCellRectByCoords | Finds the cell on the given coordinates and returns the cell rectangle | |
GetColByAbsX | (Long) | Returns the column number relative to a certain X coordinate (the X coordinate with the HScroll_Value) |
GetColByX | (Long) | Returns the column number relative to a certain X coordinate (the X coordinate without the HScroll_Value as obtained by the MouseMove, MouseDown and MouseUp events) |
GetColX | (Long) | Returns the absolute X coordinate relative to a certain column number (the X coordinate + the HScroll_Value) |
GetCurrCellPicture | Gets picture information for the cell in the given column on the current row | |
GetRowByAbsY | (Long) | Returns the row number relative to the given Y coordinate (the Y coordinate with the VScroll_Value) |
GetRowByY | (Long) | Returns the row number relative to the given Y coordinate (the Y coordinate without the VScroll_Value as obtained by the MouseMove, MouseDown and MouseUp events) |
GetRowY | (Long) | Returns the absolute Y coordinate of a certain row (the Y coordinate + the VScroll_Value). |
GetVisibleRows | (Integer) | Returns the number of visible rows in the viewport |
IsHeaderCoord | (Boolean) | Returns True if the given y coordinate is used for displaying the header |
IsRowCompletelyVisible | (Boolean) | Checks if the given row is completely visible |
NoUpdate | Terminates a [BeginUpdate] reactivating the control after a long-time update Doesn't refresh the control view |
|
OLEDrag | Starts an OLEDrag operation | |
Refresh | Redraws the control | |
RemoveColumn | Removes a certain column | |
RemoveRow | Removes the given row | |
SelectAll | Selects all items | |
SelectRange | Selects a range of items | |
SetCellPicture | Sets the picture for the given cell | |
SetColFormat | Sets the formatting options when displaying a Numeric column in the grid | |
SetCurrCellPicture | Sets the picture for the cell in the given column on the current row | |
SortByColum | Sorts the grid on a certain column | |
ViewPortHeight | (Long) | The Viewport height |
ViewPortWidth | (Long) | The Viewport width |
Option Explicit
Private Sub pvLoadRows()
Dim sEl As String
Dim i As Integer
Dim oWrap As New HexUniControls.clsCommonWrapper
Dim sChin As String
Dim sJap As String
Dim sArab As String
sChin = oWrap.HextoStr("0XqYsRYuxO9HalY39PKHVVAG4AaQBjAG8AZABlAA==4F")
sJap = oWrap.HextoStr("0X7DDDMMQwkjB/Tyh1WTCLMFUAbgBpAGMAbwBkAGUAh2VXW5Iw9HalYw==17")
sArab = oWrap.HextoStr("0XRwYwBkcGIAAnBkQGRQZDBioGKAYpBiAAMwZIBkEGIABKBjMGRQYtBiAARAZDBiAAJwYzBioGLgYvBicGRQYgAEoGSAZGBkoGQwZIBi8GIABBBkoGIAAoBjEGJwZFBiwGQwY=1F")
With ctlUniGrid1
.BeginUpdate
.Clear
.AddColumn , , , "pic"
.AddColumn "First", , , , , , True
.AddColumn "Second", , , "sec", , [UniGrid Align Left], True
.AddColumn "Third", , , , , , True
.AddColumn "Forth - RTL", , , , , , True, , True
.AddColumn "Fifth", , , , , , True
.AddColumn "Boolean", , , "bool", , , True, , , [UniGrid Column Boolean]
.AddColumn "Numeric", , [UniGrid Align Right], "num", , , True, , , [UniGrid Column Numeric]
'Setup the formatting options for the numeric column
.SetColFormat "num", , , , 5, True, True, True
For i = 1 To 500
sEl = "" & vbTab & _
CInt(Rnd * 10) & sChin & vbTab & _
"&" & String(CInt(1 + Rnd * 10), "b") & vbTab & _
CInt(Rnd * 10) & sJap & vbTab & _
CInt(Rnd * 10) & sArab & vbTab & _
String(CInt(1 + Rnd * 30), "y")
.AddRow sEl
.CellValue(i, "bool") = IIf(i Mod 2 = 0, True, False)
.CellValue(i, "num") = Rnd * 5000
If i Mod 5 = 0 Then
.SetCellPicture i, "pic", MDIForm1.ctlImageBag1.GetPicture(eGlobalImgIndex.egii_x)
ElseIf i Mod 7 = 0 Then
.SetCellPicture i, "pic", MDIForm1.ctlImageBag1.GetPicture(eGlobalImgIndex.egii_help), , True
End If
Next
.CellBackColor(1, 2) = vbRed
.CellValue(1, "sec") = "changed using Key"
.Row = 5
.CurrCellValue("sec") = "ppp"
.EndUpdate
End With
End Sub
Private Sub ctlUniButtonImageXP2_Click()
ctlUniGrid1.FixedCols = 1
End Sub
Private Sub Form_Load()
pvLoadRows
End Sub