vfp程序界面中,在父窗口点击一个按钮到子窗口,子窗口可输入关键字,
如何使主窗口某按钮触发事件时,引用父窗口里的控件,直接用父窗口控件名称好象不可以的,请高手指点 *------------------------------------------------------------------------------------- 用父窗口(表单)的文件名. 如你的父窗口(表单)文件名为FormF.scx,Name为Form1, 那么在子窗口(表单)调用:FormF.Text1.value='123',而不用父窗口(表单)的NAME值。 举个例子: 表单1的文件名为 FORM_1.SCX 表单1的NAME值为 FORM1 表单2的文件名为 FORM_2.SCX 表单2的NAME值为 FORM2 当表单1和表单2都在运行时,在表单1修改表单2的属性的最简单方法: 如: FORM_2.CAPTION='修改成功!' 而不是 FORM2.CAPTION='修改成功!' 同理: 当表单1和表单2都在运行时,在表单2修改表单1的属性的最简单方法: 如: FORM_1.CAPTION='修改成功!' 而不是 FORM1.CAPTION='修改成功!' -------------------------------------------- 可以在父窗口初始化(Init)时定义一个全局变量: Public goParent goParent = THIS 这样不管在什么地方,都可以用类似这样的代码来引用该窗口里的控件:goParent.Command1.Caption = "" 。 也可以把父窗口作为一个参数传递给子窗口,然后在子窗口中引用。 父窗口这样调用子窗口:DO FORM FORM1 WITH THIS 然后在子窗口的Init事件中可以这样: LPARAMETERS toParent toParent.Command1.Caption = "" 如果要在子窗口的Init事件以外引用父窗口,则可以给子窗口新建一个属性,比如oParent,然后Init事件: LPARAMETERS toParent THIS.oParent = toParent 这样在子窗口的其他地方就可以这样用了: THISFORM.oParent.Command1.Caption = "" --------------------------------------------- 如何实现两个表单之间的相互控制? 现在有两个表单 form1 和 form2 (不是表单集) 他们在同时运行之后 如何相互控制呢,比如说 点击form1 的command1 按钮 使form2 的 text1 文本框内容清空 如何实现呢? 答:方法很多 1、表单是容器对象,它可以像变量一样来赋值 a、在运行这两个表单前可以定义两个全局变量 public m.loForm1, m.loForm2 b、在表单Form1的Init 事件中写入 m.loForm1 = ThisForm c、在表单Form2的Init 事件中写入 m.loForm2 = ThisForm 那么要点击form1 的command1 按钮 使form2 的 text1 文本框内容清空 在Form1的command1 按钮的Click 事件中写如下代码即可 m.loForm2.text1.value = '' m.loForm2.Refresh 2、可以使用_VFP 系统变量 的Forms 属性来操作这两个表单 首先 在Form1的command1按钮的Click事件中 通过For 循环语句 通过 _VFP.Forms(I).Caption='Form2'或 _VFP.Forms(I).Name='Form2' 来找到Form2这个表单 就可以通过 _VFP.Forms(I).Text1.value = '' 来实现了 For lnFor=1 to _VFP.Forms.Count if ( _VFP.Forms(lnFor).Caption='Form2') then _VFP.Forms(lnFor).Text1.value = '' endif EndFor |
|