>DECLARE INTEGER GetSysColor IN "user32" INTEGER nIndex >lnBgColor = GetSysColor( 13 ) >lnFgColor = GetSysColor( 14 ) > >This.nRecNo = RECNO( This.RecordSource ) >This.SetAll( 'DynamicForeColor', ; > "IIF( RECNO( This.RecordSource ) = This.nRecNo, " + TRANSFORM( lnFgColor ) + ", " + TRANSFORM( This.ForeColor ) + " )", 'COLUMN' ) >This.SetAll( 'DynamicBackColor', ; > "IIF( RECNO( This.RecordSource ) = This.nRecNo, " + TRANSFORM( lnBgColor ) + ", " + TRANSFORM( This.BackColor ) + " )", 'COLUMN' ) >Thanks a million, Marcia. I will send a copy of your message to myself to not loose it.