>Another option worth trying, is simply to replace your quotes with [ ] around your expression- which should make the substitutions you want.
>
>

#DEFINE ACTIVEROWFORECOL		16711680		&&KOBALT blue
>#DEFINE ROWFORECOL			0 			&&black
>This.SetAll( 'DynamicForeColor', ;
>	[IIF( RECNO( This.RecordSource ) = This.nRecNo, ACTIVEROWFORECOL, ROWFORECOL )], 'COLUMN' )

True