如图示，如何让这些代码像COMMAND控件一样正常运行?




[ 本帖最后由 pzyun1985 于 2014-5-18 19:41 编辑 ]

把“THISFORM”换成表单的实际名称。

1. 在菜单设计器中，选择菜单“View”－“General Options”，在对话框中单击“Setup”，单击 OK，在过程窗口中输入：PARAMETERS oRef
2. 对菜单“预览当前户家庭档案卡”的过程代码，修改如下：将 THISFORM 修改为 oRef，如：oRef.Image6.Visible = .f.
3. 表格的 RightClick 修改为：do 右键菜单.mpr with thisform
   

不行的，

不知道哪里出的错


[ 本帖最后由 pzyun1985 于 2014-5-18 21:36 编辑 ]

楼主要看清我写的步骤：在“常规选项”窗口中单击“设置(Setup)”，会在当前窗口后面打开一个“设置”窗口，但此时你无法激活该窗口，必须单击“常规选项”窗口的“确定(OK)”，关闭当前窗口才能激活该窗口，此时在“设置”窗口中输入 parameters oRef。注意：是在“设置”窗口中输入，而不是在“常规选项”窗口的编辑框中输入。

这样设置的目的很简单，就是在生成的 *.mpr 程序中，在程序首行（不包括注释行），添加行参 parameters oRef 语句，从而可以接收 RightClick 传递过来的 THISFORM 参数。

楼上详细

高手高手高高手

学习学习再学习

在右键快捷菜单中引用窗口对象很简单的啊，在窗体的Init事件中加入一行：ABC=This，就行了。其中，“ABC”是内存变量，“This”代表窗体本身。执行了这句后，ABC就成了一个对象型变量。在任何外部程序或窗体内部各事件、方法程序中都可以用ABC代替Thisform。比如：ABC.Image6.Visible=.F.。当然，要在各程序中通用，在之前还要加一句PUBLIC ABC。