|
|
四川 牟善铸
尽管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中运行通过。
|
|
