将焦点设置为绘图区域
有人能给我指出正确的方向吗 ；我知道那里'；这是一种在单击无模式窗体上的按钮后将焦点设置到绘图区域的方法；我认为这与申请标题有关 ；但我'；我不是百分之百肯定有人吗？
你是说像这样
Dim X As New EventClassModule
Sub InitializeEvents()
Set X.App = ThisDrawing.Application
End Sub
Call InitializeEvents
那么我相信你可以将Setfocus用于应用程序X。我可能错了，哈文'；t过了一会儿才编码
谢谢
昨天晚上我为AppActivate找到了一些东西——这似乎把蜘蛛网弄松了。 您提到；无模式窗口。此代码是否从autocad内部运行？如果是这样。请记住，如果您的代码最终运行到模式对话框中，您的'；你的应用程序将永远等待，你关闭窗口的代码将永远不会被调用
如果它'；从autocad外部运行，并且您已经在Acad应用程序上使用OLE，那么每个图形窗口都有自己的hWnd，而不仅仅是父应用程序 ；这意味着您不必使用“隧道”；FindWindow“；和“；EnumChildWindows“；API调用
I'；d获得；此图纸。hwnd“；在对话框出现之前，使用；“设置活动窗口”；对hwnd的API调用：
声明函数SetActiveWindow Lib“；user32.dll“；（ByVal hwnd As Long）一样长 谢谢
页:
[1]