获得autocad应用程序窗口的句柄
www.dimcax.com
获得autocad应用程序窗口的句柄[转载]获得autocad应用程序窗口的句柄
attribute vb_name = "getacadhwnd" 'purpose ' returns the handle to the autocad application window 'notes ' use this when you need a handle to autocad's main window rather than a document window
public declare function getparent lib "user32" (byval hwnd as long) as long
public function getacadhwnd() as long
getacadhwnd = getparent(getparent(thisdrawing.hwnd))
end function
哪位xd能帮解释一下thisdrawing具体是个什么，是个autocad文件还是其它什么。
[此贴子已经被作者于
vba中thisdrawing是指的当前文档.
这里应该用acadapp.activedocument代替