求助：请问在其他应用程序中可以判断某张CAD图纸的打开状态吗？

qinlong_01 · 发表于 2005-4-7 09:42:00

请教各位高手，多多帮忙啊！我想在pb程序中判断某张CAD图纸是否处于打开状态，请问可以做到吗？？？？

qinlong_01 · 发表于 2005-4-7 16:07:00

各位版主帮帮忙吧，难道真的没有办法？

雪山飞狐_lzh · 发表于 2005-4-7 16:14:00

Function IsOpened(FilePath As String)
Dim i As AcadDocument
IsOpened = False
For Each i In Application.Documents
If i.FullName = FilePath Then IsOpened = True: Exit For
Next i
End Function

qinlong_01 · 发表于 2005-4-7 16:21:00

版主你好：我是想在pb开发的程序中，判断模板图纸是否处于打开状态。您上面所用的方法只能在vb中用是吧？

雪山飞狐_lzh · 发表于 2005-4-7 16:25:00

pb没玩过，原理是一样的，你自己代码移植一下吧

qinlong_01 · 发表于 2005-4-7 17:20:00

哦……感谢版主支持！

qinlong_01 · 发表于 2005-4-7 17:30:00

请问版主：如何让打开一张自己定义好的模板图纸时，自动运行编写的过程函数。我把函数放到了thisdrawing中的activate事件中了，第一次还是要经过点击菜单才有效，但是再打开其他图纸时就会自动执行了（第一次后CAD不关闭）。请问版主一开始为什么不触发呢？

求助：请问在其他应用程序中可以判断某张CAD图纸的打开状态吗？

发表回复

精选推荐