打印本文 打印本文  关闭窗口 关闭窗口  
如何在运行时添加表到表单的数据环境
作者：佚名  文章来源：不详  点击数  更新时间：2008/4/18 14:51:41  文章录入：杜斌  责任编辑：杜斌
　　概述 
　　表或视图可以在运行时添加到 Visual FoxPro  表单中. 虽然 你可以用 USE 命令打开表, 但将其添加到表单的数据环境更好. 如果表单是设置为私有数据工作期, 则该表会只添加到当前数据工作期的数据环境中.  

　　更多信息 

　　逐步演示 

　　用表单设计器创建一个新表.  

　　设置表单的 DataSession 属性为 2-私有数据工作期.  

　　添加一个命令按钮到表单, 并放入以下代码到它的 Click 事件中:  
　　WITH THISFORM.DataEnvironment   
     .ADDOBJECT("mycursor","cursor") 
     .mycursor.Database= SYS(2004)+"samples\data\testdata.dbc"  
     .mycursor.CursorSource="customer" 
     .CloseTables()  && 关闭所有的表和与数据环境相关的视图 
     .OpenTables()   && 打开所有的表和与数据环境相关的视图 
　　ENDWITH 

　　保存表单. 然后运行表单的两个实例. 

　　单击表单的第一个实例上的命令按钮, 但不要  单击表单的第二个实例上的按钮. 

　　在调试窗口中打入:     

　　_SCREEN.ACTIVEFORM.DataEnvironment.mycursor.CursorSource  

　　当你在两个表单间切换时, 注意调试窗口中的值的改变与活动的数据工作期有关. 表只在表单的第一个实例的数据环境中.
打印本文 打印本文  关闭窗口 关闭窗口