CREATE CURSOR tt (姓名 C(8), 性别 C(2))
INSERT INTO tt VALUES ("张三", "男")
INSERT INTO tt VALUES ("三姑", "女")
INSERT INTO tt VALUES ("李四", "男")
INSERT INTO tt VALUES ("六婆", "女")
INSERT INTO tt VALUES ("王五", "男")
INSERT INTO tt VALUES ("七婶", "女")
BROWSE NAME og NOWAIT
GO TOP
og.Column2.DynamicForeColor = 'IIF(性别=="男", RGB(255,0,0),RGB(0,0,255))'