本文是一个关于表单集的小实例。本例运行时表单集中的表单form2的状态是隐藏,表单form1上面的表格显示的是“网站信息表”中的数据,如下图:
单击了“显示附加信息”命令按钮后,该按钮上面的文字变为“隐藏附加信息”,同时表单form2显示出来,它上面的表格显示的是“附加信息表”中的数据;并且form1和form2上面的两个表格中的数据能实现数据联动,即在form1的表格中单击一个网站的记录,在form2的表格中会显示该网站的附加信息。当命令按钮上的文字变为“隐藏附加信息”时,单击该命令按钮可将form2再次隐藏。如下图
本例用到了“数据1”数据库中的“网站信息表”和“附加信息表”,关于该数据库的情况已经在看实例学VFP:示例数据库一文中给出。本例制作步骤如下:
一、新建表单,将其保存为“表单集的例子.scx”。在表单设计器打开的状态下,单击菜单栏中“表单”→“创建表单集”,这样就创建了一个表单集FormSet1,其中包含了一个表单form1。我们接着向这个表单集中再添加一个表单,方法是在表单设计器打开的状态下单击菜单栏中“表单”→“添加新表单”,此时表单设计器中又会多了一个表单form2,刚添加上去时它是把原来的表单form1盖住的,你可以拖动form2的标题栏向下来一点儿,就可以看到这两个表单了。
二、设置两个表单的属性,将form1的Caption属性设置为“网站信息表”,form2的Caption属性设置为“附加信息表”,form1和form2的width属性值均设为300,Height属性值均设为168,设置完毕的表单设计器如下图:
三、添加数据环境:右击form1空白处,选“数据环境”命令,将“数据1”中的“网站信息表”及“附加信息表”这两个表添加到表单的数据环境中。
四、在“数据环境设计器”中,拖动“网站信息表”的“编号”字段到“附加信息表”的“网站编号”索引标识上,这时在“数据环境设计器”中“网站信息表”及“附加信息表”之间会出现一条单线,表明这两个表之间已经建立起了一对一的临时关系(如下图),该关系在表单启动时被建立,表单关闭时释放。
五、从“数据环境设计器”中拖动“网站信息表”的标题栏到form1上,自动生成一个表格,并按照表1设置该表格的属性:
属性名 | 属性值 |
width | 294 |
height | 137 |
top | 0 |
left | 0 |
表1
然后在该表格的右下角添加一个命令按钮command1,并将该命令按钮的Caption属性设置为“显示附加信息”;类似的方法,从“数据环境设计器”中拖动“附加信息表”的标题栏到form2上,自动生成一个表格,并按照表1设置该表格的属性。设置完毕的表单设计器如下图:
六、添加事件代码:
(1).表单form1的Unload事件代码:close data
(2).表单form1的Init事件代码:thisform.Parent.form2.Hide
(3).表单form1的QueryUnload事件代码:thisform.Release
(4).命令按钮command1的click事件代码:
IF this.Caption='显示附加信息' this.Caption='隐藏附加信息' thisform.Parent.form2.Show ELSE this.Caption='显示附加信息' thisform.Parent.form2.Hide ENDIF
七、运行“表单集的例子.scx”。
本例代码在Win2003+VFP6.0环境下调试通过。
查看全套“菜鸟<学VFP”教程
版权与免责声明
1、本站所发布的文章仅供技术交流参考,本站不主张将其做为决策的依据,浏览者可自愿选择采信与否,本站不对因采信这些信息所产生的任何问题负责。
2、本站部分文章来源于网络,其版权为原权利人所有。由于来源之故,有的文章未能获得作者姓名,署“未知”或“佚名”。对于这些文章,有知悉作者姓名的请告知本站,以便及时署名。如果作者要求删除,我们将予以删除。除此之外本站不再承担其它责任。
3、本站部分文章来源于本站原创,本站拥有所有权利。
4、如对本站发布的信息有异议,请联系我们,经本站确认后,将在三个工作日内做出修改或删除处理。
请参阅权责声明!