BTW Why the code is duplicated in ARCC ?
Cetin
>Hi Randy,
>
>You can use DYNAMICBACKCOLOR and DYNAMICFORECOLOR.
>Use this code at the Init event of your form:
>
>Public MyRecNo
>Thisform.MyGrid.SetAll("DynamicBackColor", "IIF(RECNO( )=MyRecNo, RGB(0,0,128), RGB(255,255,255))", "Column") && Painting backcolor: Blue
>Thisform.MyGrid.SetAll("DynamicForeColor", "IIF(RECNO( )=MyRecNo, RGB(255, 255, 255), RGB(0,0,0))", "Column") && Painting letters: white
>
>After doing an Append Blank, add:
>
>MyRecNo = RecNo()
>Thisform.Refresh()
>
>Add this, also to the AfterRowColChange event of your Grid.
>
>That should make what you want.
>
>Cheers,
>
>Ricardo