Bernard, just make ControlSource of the spinner to be the same field of the cursor as the column you want.
>Thank Martin,
>
>
http://cjoint.com/data/mll7fVBPaL.htm>
>In cspinner interactiveChange()
>Nothing in ctrlsource Property.
>
>
>THIS.PARENT.cgrid1.nlockcolumn = THIS.VALUE
>THIS.PARENT.cgrid1.leftpanel()
>
>
>bernhart
>
>
>
>>Hi Bernhart,
>>
>>Class COLUMN has property VALUE?
>>
>>No,hasn't it.
>>
>>GRID has property VALUE. Or you can use this:
>>
>>
>>PROCEDURE GetColumValue(loGrid,lcColumnName)
>>LOCAL loColumn
>>IF !PEMSTATUS(loGrid,lcColumnName,5)
>> RETURN .NULL.
>>ENDIF
>>loColumn=EVAL("loGrid."+lcColumnName)
>>RETURN EVAL("loColumn.ControlSource")
>>
>>
>>spinner, ControlSource= GetColumValue(This.Parent.cGrid1,"nlockcolumn")
>>
>>MartiJ
>>
>>>Hi all,
>>>
>>>When i try to connect a controlsource with a object value i have a error.
>>>
>>>
http://cjoint.com/data/mljpxvifZx.htm>>>
>>>What can i do ?
>>>
>>>bernhart
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.