Hi,

I'm trying to loop through all the controls in a grid and set the click code for every text box in the grid init.

Can anyone help me with the syntax to include the 2 lines of code below in the click method of each text box ?

***************************************************************************
LOCAL liColIndex
FOR liColIndex=1 TO this.ColumnCount && loop through all grid columns
WITH this.Columns(liColIndex)
IF upper(.CurrentControl) == 'TEXT1' && replace only columns that have default textbox

* set the Click method of this textbox control
* .Click = ??? the next 2 lines of code
* Thisform.Foundkey = evaluate(THISFORM.cTableKey)
* ThisForm.Release

ENDIF
ENDWITH
ENDFOR
***************************************************************************

TIA
Chris