General information
Category:
Forms & Form designer
Environment versions
Network:
Windows 2003 Server
No, should I use that method?
it's being redefined when the grids loads with code, I don't have the combobox in the grid.
Is this the wrong appraoch? Should I just use that method?
WITH Thisform.grdControlRec
.recordsource = "ControlRec"
.recordsourcetype = 1
FOR intCol = 1 TO 3
mColHdr = '"' + IIF(intCol = 1, "Basic Symbol", IIF(intCol = 2, "Fiscal Yr", "Table Type")) + '"'
mcolName = '.column' + alltrim(str(intCol))
mcurFunction = mcolName + ".header1.Caption = " + mColHdr
&mCurFunction
mcmbName = 'column' + alltrim(str(intCol))
mcurFunction = mcolName + ".AddObject (mcmbName,'Combobox')"
&mCurFunction
mcurFunction = mcolName + ".CurrentControl = mcmbName"
&mCurFunction
mcurControl = mcolName + '.' + mcmbName + '.rowsource = IIF(intCol = 1, "basic_symbol.bs_code", IIF(intCol = 2, "fiscal_year.fy", "tabletype.datavalue"))'
&mcurControl
mcurControl = mcolName + '.' + mcmbName + '.rowsourcetype = 6'
&mcurControl
mcurControl = mcolName + '.' + mcmbName + '.Visible = .T.'
&mcurControl
ENDFOR
*ENDWITH
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only