New Function "ComboWBlock". Creates a View/Edit code block to edit a
cell via a ComboBox control.
Syntax:
ComboWBlock( <oBrw>, <uField>, <nCol>, <aItems> )
Parameters (all required):
<oBrw> = The TSBrowse object
<uField> = Field Pos or Field Name (any) when editing databases. Whith
arrays, <uField> will be the number of the array element.
<nCol> = Column number in <oBrw>
<aItems> = Array containing the items to be used by the ComboBox control
Note: <aItems> can be a single array or a double array ( {aItems,aData} ),
in this last case, TSBrowse will show "aItems" and will replace the
data with the corresponding "aData" element. Obviously, both
arrays must have the same number of elements.
Example:
aItems := { "Pieces", "Feet", "Gallons" }
aData := { "PC", "FT", "GA" }
nColum := 1
cField := "Unit"
@ 0, 0 BROWSE oBrw CELLED ALIAS "Products"....
ADD COLUMN TO oBrw Title "Units" COMBOBOX SIZE 80 PIXELS EDITABLE ;
DATA ComboWBlock( oBrw, cField, nColum, { aItems, aData } ) ;