【结帖】如何让runfunc的窗体showmodal**

ccseasy · 发表于 2008-1-8 12:04:02

如题。
目的：想让执行完弹出窗体后所有动作后，再执行showmodal后的代码。

lixy · 发表于 2008-1-8 13:37:47

把那些代码放到showmodal的代码前面去

ccseasy · 发表于 2008-1-8 13:45:41

看清楚问题再回。问的是怎么让runfunc调出的功能窗体以showmodal方式显示

shangxy · 发表于 2008-1-8 14:22:24

目的：想让执行完弹出窗体后所有动作后，再执行showmodal后的代码。

这个没有太明白，如果想要让功能全屏限时可以修改一下runfunc函数的model参数

ccseasy · 发表于 2008-1-8 15:13:28

SYSTEMCORE.TSystemCore.FuncManager.RunFunc(Context,'','Biz:\NJZHGL\FUNC\RYXZ.Func',lWorkID, nil,False)
然后怎么写？
目的：就是为了能够showmodal。
如果在事件中try showmodal窗体后，是不是只有执行完了窗体操作关闭后才执行finally的代码

ccseasy · 发表于 2008-1-8 15:45:24

最初由 shangxy 发布
[B]目的：想让执行完弹出窗体后所有动作后，再执行showmodal后的代码。

这个没有太明白，如果想要让功能全屏限时可以修改一下runfunc函数的model参数 [/B]

不是让窗体全屏显示。是showmodal。
难道showmodal就是全屏？？？～～～。。。。。。

lixy · 发表于 2008-1-8 15:53:48

SYSTEMCORE.TSystemCore.FuncManager.RunFunc(Context,'','Biz:\JUSTEP\YWGN33.Func','', nil,true);
Button1.Caption:='ldflsdf';

执行完第一句后，会showmodal功能，他界面关掉，才会执行第二条语句

ccseasy · 发表于 2008-1-8 16:05:19

你试试。我的反正不行！
是否还有什么需要设置的地方？

lixy · 发表于 2008-1-8 16:23:11

没有其它设置
7楼是我测试过的代码。

zfang · 发表于 2008-1-8 16:31:19

不需要什么别的设置阿！
上面的测试过的，没有问题的！
runfunc的最后那个参数为True，不知道楼主是否一致！

		自动登录	找回密码
密码			立即注册