Introduction
this object (ActiveX control) a best grid .
See Image Please.

Introduction:
Exist Grids Programs always include a basic fault .
A Object included many Property & many Methods & many Events.
But in Grid , can’t see a field similar to an Object.
And a Grid don’t includes all “base Objects” (TextBox , CheckBox , RadioButton , CommandButton , ComboBox , ListBox , …)

I always feel that .
I feel , most be create many Objects similar to “base Objects “ , included all Properties and methods and Events of basic Objects and can use this instead of Grid.
Oracle Developer very help me.
2 years ago I works to this method (Group Objects) and yet not completed .
Target :
Create many Objects with 4 properties
1- Single Objects ( Separated with other similar objects )
2- very simply to link them
3- included all property and methods and Events of basic Objects.
4- Can used this similar Grid.(Multi row)
This object (gTextBox):
This Object(after that call gTextBox) is similar to a TextBox (with Maximum compatibility) but a different , This is a Group TextBox objects instead of single TextBox .
I named this “gTextBox”.
I am doing create other objects (gCheckBox-gCommandButton-gComboBox and …)
gTextBox included many properties -methods and events for itself and all properties and methods and events of single TextBox .
see this image :

Any row included all properties and methods and events a TextBox and included many property and methods and events to itself.
Professional Details
ü gTextBox Properties
Property Name |
Description |
Access |
|
ChangeForeColor |
After Change Text Change forecolor to this |
R(rw)
D(rw) |
|
Count |
Number of Record is exist |
R(r) |
|
GridColor |
set and return Grid Color |
R(rw)
D(rw) |
|
NumberOnly |
set and return gTextBox only Number input (not alphabet) |
R(rw)
D(rw) |
|
ParsiWrite |
set and return input language (for Persian Language only) |
R(rw)
D(rw) |
|
ReadOnly |
set and return gTextBox is Read only or not (if Read Only not editable) |
R(rw)
D(rw) |
|
Records |
Include All Records in gTextBox(is a collection class) |
R(rw) |
|
RowBackColor |
set and return Current Row Back Color |
R(rw)
D(rw) |
|
RowForeColor |
set and return Current Row fore Color
|
R(rw)
D(rw) |
|
RowShow |
set and return Number of row show (default is 10) |
R(rw)
D(rw) |
|
RowSize |
set and return row size ( Pixel ) |
R(rw)
D(rw) |
|
ScrollBar |
set and return scroll bar exist or not |
R(rw)
D(rw) |
|
ScrollWidth |
set and return scroll bar width (pixel) |
R(rw)
D(rw) |
|
SelectedItem |
set and return current item |
R(r) |
|
SizableRow |
set and return can change row size at runtime |
R(rw)
D(rw) |
|
SpaceHorizontal |
set and return space between this object with other object |
R(rw)
D(rw) |
|
SpaceVertical |
set and return space between textboxs in gTextBox |
R(rw)
D(rw) |
|
R = access at Runtime
D=access at Designtime
(r)=readable
(w)=writeable |
ü gTextBox Methods
Method Name |
Description |
Parameters |
|
AddItem |
Add a new record to Records
|
Text as string |
|
Clear |
Clear all records and set Records property to empty |
None |
|
GoFocus |
Set Focus to a text box (current row) |
|
|
MoveRecordTo |
Move row to a specified record ( you most say row number [newCursor] and record number [newRecord] ) |
newCursor as integer
newRecord as long |
|
Refresh |
Refresh all records of gTextBox |
None |
|
Remove |
Remove specified record |
DeletedRecordNo as long |
|
RollBack |
Roll back specified record |
RecordNo as long (if not define roll back all records) |
ü gTextBox Events
Event Name |
Description |
Parameters |
HappenedTime |
|
AfterDelete |
After delete a row active this event |
None |
After delete |
|
AfterInsert |
After insert a record active this event |
RecordNo as long record number to be inserted |
After insert |
|
AfterChange |
After change a record (only first time) |
CursorNo as integer (row number)
RecordNo as long |
After change |
|
BeforeChange |
Before change a record (only first time) |
CursorNo as integer (row number)
RecordNo as long |
Before change |
|
BeforeDelete |
Before delete a record (only current record)
You can cancel deleting |
Cancel As Boolean |
Before delete |
|
BeforeClear |
Before clear all record
You can cancel clearing |
Cancel As Boolean |
Before clear |
|
BeforeInsert |
Before insert a record
You can cancel inserting |
Cancel As Boolean |
Before insert |
|
ChangeRowSize |
change row size (if drag grid with mouse)
you can cancel row size change |
Cancel As Boolean ChangeSize As Single |
On change (drag mouse on grid) |
|
OnMoveRecord |
Moving a new record |
CursorNo As Integer
RecordNo As Long |
After change row number |
|
OnScroll |
Scroll and going to new record |
CursorNo As Integer
RecordNo As Long |
After move to new record only with change scroll bar |
|
Validation |
Validation (equal validate Event) |
CursorNo As Integer
RecordNo As Long
Cancel As Boolean |
Before exit from a row |
Revision History(Version)
Version 1.0
- Last Updates at 29/Tir/2562(Parsi) equal 20-july-2003
Further program (Coming version)
1- connecting ADO DataBase .
2- add Formula property (very powerfull)
3- and …