isreadonly( ) 函数示例

close databases
open database (home( ) + 'samples\data\testdata')
use customer	 noupdate  && 以只读方式打开 customer 表
clear
? isreadonly('customer')  && 返回 .t.