Hi,

FOR EACH oCol IN THISFORM.GRID1.COLUMNS
oCol.FontSize = 12
INKEY(.5)
NEXT

Is that what you want ?

>Can anyone help me to use FOR EACH command
>
>eg. FOR EACH column IN THISFORM.GRID1 ?????
>
>
>Now I am using
>
>FOR mCnt = 1 TO THISFORM.grid1.columncount
> THISFORM.grid1.columns(mCnt).READONLY = 'DDD'
>ENDFOR
>
>TIA.