with thisform.GrdInvRes .RecordSource = "xtabresult" .SetAll( "DynamicForecolor", "thisform.RowColor()", "column" ) endwith2. Here is the second column:
local lnColor do case case ... lnColor = rgb( 255, 0, 0 ) case ... lnColor = rgb( 0, 255, 0 ) otherwise lnColor = rgb( 0, 0, 0 ) endcase return lnColorHere is the problem:
case ? = 'aaa' &&?- grid value this?=(rgb)250,250,11 &&?-grid header name