>="IIF( .T., RGB(b_red,b_green,b_blue), 0)"
>
>="IIF( .T., MyCursor.Sch_BackColor, 0)"
This works for me coming from a different cursor than the RowSource.PUBLIC oform1 oform1=NEWOBJECT("form1") oform1.Show RETURN ************************************************** *-- Form: form1 (c:\vfp9stuff\grddynamic.scx) *-- ParentClass: form *-- BaseClass: form *-- Time Stamp: 01/22/08 08:50:08 AM * DEFINE CLASS form1 AS form DoCreate = .T. Caption = "Form1" Name = "Form1" ADD OBJECT grid1 AS grid WITH ; Height = 121, ; Highlight = .F., ; HighlightRow = .T., ; Left = 48, ; Top = 48, ; Width = 277, ; AllowCellSelection = .F., ; Name = "Grid1" PROCEDURE Load CREATE CURSOR grdcolor (c1 i, c2 i) INSERT INTO grdcolor VALUES (RGB(255,0,0),RGB(0,0,255)) CREATE CURSOR test (f1 c(10)) INSERT INTO test VALUES ("one") INSERT INTO test VALUES ("two") INSERT INTO test VALUES ("three") GO TOP ENDPROC PROCEDURE grid1.Init this.Columns(1).dynamicbackcolor="IIF(RECNO()%2=1,grdcolor.c1,grdcolor.c2)" ENDPROC ENDDEFINE * *-- EndDefine: form1 **************************************************