外部TToolButton点击后弹出一个窗口,要对这个窗口操作,怎么继续操作
外部TToolButton点击后弹出一个窗口,要对这个窗口操作,如何继续操作?
想实现的功能是: 在外部程序的A窗口上点按钮, 弹出B窗口, 对B窗口进行操作后,再关闭B窗口.
TToolButton(vWinControl.Components[I]).Click;
这条语句可以点击一个外部程序A 上的按钮, 此时会打开另外一个窗口B.
在spy中看到, A和B窗口 是同个级别的
listHandle := FindWindow('窗口B句柄', nil);
这句可以找到B窗口的句柄, 然后就往下继续要做的事. 问题来了, 除非关掉B窗口, 否则就无法继续进行下面的代码. 可B窗口进行操作.
请前辈们指点下. 谢谢!
------解决方案--------------------
B肯定是模态的，所以你必须先关掉
------解决方案--------------------
楼主：
这是Form.ShowModal和Form.show的区别
用show的话，指定一个容器（避免Form一闪而过），这样不关闭Form，还是可以执行后面的语句。
ShowModal的话，必须关闭窗体才能执行后面的语句。
------解决方案--------------------
Form1.ShowModal //模态窗口，只有关闭本窗口，才能操作前面打开的其它窗口,但是如果在Form1中的Button点击后创建Form2.ShowModal;是可以操作FORM2的。
Form1.show //非模态窗口，可以任意切换窗口
所以你可以在Form1.ShowModal前释放另一个窗口，然后你要操作另一个窗口时在FORM1中创建即可
------解决方案--------------------
楼主，是别人的代码没法搞呀。。。
坐等高手。。。。
------解决方案--------------------
改源码
但showmodal要等窗口关掉后才继续执行后面的代码
如果改为show，后面不受影响继续执行。这个改动后不一定会出现什么更严重的错误
------解决方案--------------------
8楼方法不错，哈哈。直接干掉B窗体！
------解决方案--------------------
应该是调用方式不对吧
想实现的功能是: 在外部程序的A窗口上点按钮, 弹出B窗口, 对B窗口进行操作后,再关闭B窗口.
TToolButton(vWinControl.Components[I]).Click;
这条语句可以点击一个外部程序A 上的按钮, 此时会打开另外一个窗口B.
在spy中看到, A和B窗口 是同个级别的
listHandle := FindWindow('窗口B句柄', nil);
这句可以找到B窗口的句柄, 然后就往下继续要做的事. 问题来了, 除非关掉B窗口, 否则就无法继续进行下面的代码. 可B窗口进行操作.
请前辈们指点下. 谢谢!
------解决方案--------------------
B肯定是模态的，所以你必须先关掉
------解决方案--------------------
楼主：
这是Form.ShowModal和Form.show的区别
用show的话，指定一个容器（避免Form一闪而过），这样不关闭Form，还是可以执行后面的语句。
ShowModal的话，必须关闭窗体才能执行后面的语句。
------解决方案--------------------
Form1.ShowModal //模态窗口，只有关闭本窗口，才能操作前面打开的其它窗口,但是如果在Form1中的Button点击后创建Form2.ShowModal;是可以操作FORM2的。
Form1.show //非模态窗口，可以任意切换窗口
所以你可以在Form1.ShowModal前释放另一个窗口，然后你要操作另一个窗口时在FORM1中创建即可
------解决方案--------------------
楼主，是别人的代码没法搞呀。。。
坐等高手。。。。
------解决方案--------------------
改源码
但showmodal要等窗口关掉后才继续执行后面的代码
如果改为show，后面不受影响继续执行。这个改动后不一定会出现什么更严重的错误
------解决方案--------------------
8楼方法不错，哈哈。直接干掉B窗体！
------解决方案--------------------
应该是调用方式不对吧