OLE控件又是个什么洋玩艺,先来解释一下OLE,它是英文“Object Link and Enbed”的缩写,意思是对象的链接和嵌入。
这里所说的对象,与我们以前课程中所讲的对象又有所不同,不是指表单、文本框之类的东西,而是指VFP以外的东西,比如一幅图片、一段声音、一个EXCEL图表、一个WORD文件等等,我知道您这时一定很兴奋:难道在VFP的程序中也能放入这些东西吗?我的软件不就有了多媒体的功能,那岂不是帅呆了。
是的,的确是可以,下面我们就告诉您怎样做。
一、通用字段
VFP的数据表有一个通用型字段,可以放各种各样其它格式的文件,比如图片、声音等,在这里就是以OLE的方式放入的。
将其它文件放入通用字段的命令是:
APPEND GENERAL 通用字段名
[FROM 文件名]
[LINK]
比如我们可以给人事档案数据表(rsda.dbf)加一个字段“照片”,将一个人的照片用扫描仪扫好,以文件名“庄稼.bmp”存放在当前目录中,打开rsda数据表,将记录指针走到“庄稼”这条记录上,然后执行如下命令就可以将庄稼的照片放在相应的记录中了:
append general 照片 from 庄稼.bmp
具体到程序中可以在增添和修改人员的表单中增加一个文本框,在其中输入照片文件名,在该文本框的lostfocus事件中加入如下代码:
zpwjm=alltrim(this.value) &&将文本框的内容放入一个变量 if file(zpwjm) &&如果该文件存在 append general 照片 from &zpwjm &&将文件放入照片字段 else &&否则 messagebox("文件名不存在!",64,"注意") &&给出提示 endif |