feiyyu 发表于 2010-10-26 14:06:00

vb开发cass遇到的窗口控制的问题

如题,我使用vb二次开发cass,运行代码之后在cass里面弹出一个对话框窗体,我想使用api向这个窗体发送消息,但是现在控制权在弹出的窗体上,代码不能继续运行下去,请问我怎么才能使程序正常运行下去获得相应的结果

chmenf087 发表于 2010-10-26 18:15:00

<p><font face="Verdana">如果是msgbox的话下面的办法貌似无效(另你的问题提得不太明白啊是控制哪个窗口啊)</font></p>
<p><font face="Verdana">Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long</font></p>
<p><font face="Verdana">Public Declare Function GetParent Lib "user32" Alias "GetParent" (ByVal hwnd As Long) As Long</font></p>
<p><font face="Verdana">Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long</font></p>

feiyyu 发表于 2010-10-27 13:27:00

<p>谢谢楼上的,我控制的对话框是cass的图幅整饰对话框</p>
<p>有一个问题是,图幅整饰对话框弹出后,vb代码就不能继续运行下去了,根本倒不了api代码的地方</p>
<p>相当于那是一个模态窗体</p>

chmenf087 发表于 2010-10-27 21:59:00

VB的对话框会将进程挂起,貌似必须先处理,我只晓得CAD的系统变量FILEDIA可以不显示对话框,cass就不怎么知道处理了
页: [1]
查看完整版本: vb开发cass遇到的窗口控制的问题