下面的示例用 set all 方法和 dynamicbackcolor 属性为一个表格控制中的记录指定背景颜色。如果表格中显示的记录编号是偶数，则记录的 dynamicbackcolor 为白色，否则它的颜色为绿色。
在示例中，表格控制放在一个表单内，customer 表是打开的，而且内容用表格控制显示。caption 属性用来为 cust_id 字段指定一个标头标题 (customer id)。表单中放有一个命令按钮，用来关闭表单。
close all && 关闭表和数据库
open database (home( ) + 'samples\data\testdata')
use customer in 0 && 打开 customer 表
frmmyform = createobject('form') && 创建一个表单
frmmyform.closable = .f. && 废止控制菜单框
frmmyform.addobject('cmdcommand1','cmdmycmdbtn') && 添加命令按钮
frmmyform.addobject('grdgrid1','grid') && 添加表格控制
frmmyform.grdgrid1.left = 25 && 调整表格位置
frmmyform.grdgrid1.setall("dynamicbackcolor", ;
"iif(mod(recno( ), 2)=0, rgb(255,255,255) ;
, rgb(0,255,0))", "column") && 动态设置白和绿记录
frmmyform.grdgrid1.visible = .t. && 使表格控制可见
frmmyform.cmdcommand1.visible =.t. && 使“quit”命令按钮可视
frmmyform.grdgrid1.column1.header1.caption = 'customer id'
frmmyform.show && 显示表单
read events && 开始事件循环
define class cmdmycmdbtn as commandbutton && 创建命令按钮
caption = '\<quit' && 为命令按钮加标题
cancel = .t. && 默认的取消命令按钮(esc)
left = 125 && 命令按钮起始点所在的列
top = 210 && 命令按钮起始点所在的行
height = 25 && 命令按钮的高度
procedure click
clear events && 终止事件循环，关闭表单
close all && 关闭表和数据库
enddefine