VFP中的Grid表格设计技巧四则
使用VFP中表格设计浏览界面,给人简捷方便直观的感觉。下面向你介绍几例操作小技巧,希望喜欢。
#1 一、快速建立Grid表格
对于字段较多的表,要制作Grid表格非常麻烦。在这里,你只要能灵活地利用VFP的“表单生成器”,就能大大提高Grid表格的制作效率。假设需要以A.dbf为处理对象建立一个Grid表格,其建立步骤如下:
(1)建立一个只有两个字段的自由表B.dbf,并使其中的一个字段能与A.DBF中的某个字段相关;
(2)启动“表单生成器”,选择“向导方式”中的“一对多表单向导”;
(3)在“一对多表单向导”的操作引导下,以B.dbf为父表、A.dbf为子表的基本模式制作表单。在选择子表字段时,以未来Grid表格的需要来进行A.dbf字段的选取;
(4)打开由第(3)步制作的表单,剪切表单上的Grid表格,然后再退出该表单;
(5)打开您程序中需要使用Grid表格的表单,把在第(4)步上剪切的Grid表格复制到当前表单上。
这样,一个符合程序要求的Grid表格即制作完毕。用此方法制作Grid表格,表格字段越大,本方法的效率就越高。
#1 二、用Grid模拟Browse窗口
可以将Grid结合在Form对象中,模拟成一个Browse命令窗口,可以自由调整Form大小,而Grid对象也会自动调整大小。用下面方法可以实现:
(1)首先设定一个Form对象,该对象必须保留其BorderStyle为3-可调边框,这样可自由调整大小之边线属性;同时设定Resize事件程序如下:
Thisform.Grid1.Width=this.width
Thisform.Grid1.Height=this. Height
(2)设计一个Grid对象于Form对象中,并设定其属性如下:
RecordSource-目前“数据环境”中所设定的工作区别名
Top与Left均为0,表示该对象左上端坐标为0,0
Width=Thisform.Width
Height=Thisform.Height
这样,已经设定好的Grid对象和Browse窗口一般,当对Form对象进行大小调整时,对象的高度与宽度就可以随之调整了。
#1 三、在Grid中删除记录后立即移出显示
如不进行特殊设置,Grid删除记录后只是在Grid的删除记号区打上黑点,而不会立即移出显示。进行以下设置可立即移出:
(1)在主程序或Form对象的Load事件写下代码:SET DELETE ON
(2)在删除记录按钮对象的Click事件中加入代码:
DELETE
THISFORM.GRID1.COLUMN1.SETFOCUS
#1 四、设计Grid记录层次检核程序
在Grid对象中没有Valid事件程序设定位置,我们可以借助Grid对象的AfterRowColChange作为当记录指针移开时的记录检核程序,该事件当你将光标焦点移开某一列或某一栏时可以被触发。你只需在AfterRowColChange事件中加入以下代码即可:
LPARAMETERS nColIndex
IF INLIST(LASTKEY(),24,5)
?? CHR(7)
=MESSAGEGOX(″触发记录检核程序!″)
ENDIF