四川 牟善铸
尽管VFP提供的表单设计器可以很容易完成数据输入界面的设计与修改,但在通用的一些程序中,如果每用到一个表就设计或修改一次,工作量未免太大,对非专业人员也有一定的困难。能不能只选定所需的表,其输入界面保持不变?
笔者发现用VFP提供的表格控件GRID可以很容易地实现,并且能实现与EXCEL表格相同的输入形式,输入的内容全部显示在屏幕上,下面将具体实现方法介绍给大家:
(1)从GRID控件拖放到表单上(假设名为grid1),设置其属性:
Recordsourcetype为0---表
(2)为表单的active过程编程
pp=get(″dbf″,″″,″″,2)
if empty(pp)
thisform.release
return
endif
use &pp
*选定所需的表
n=fcount()
thisform.grid1.columncount=n
thisform.grid1.recordsource=pp
for i=1 to n
thisform.grid1.columns(i).header1.caption=field(i)
endfor
use
(3)再在表单加上插入、删除、添加、完成等几个按钮,就可构成较完善的输入界面,实现数据的整体输入。
此程序在586组装微机、VFP3.0中运行通过。
……