批量处理DWG文件（调用LSP）源码免费下载

phoevana · 发表于 2015-2-13 12:38:50

谢谢分享，

mikewolf2k · 发表于 2015-2-13 13:49:43

这个是用同一个ACAD进程打开/关闭dwg文件，还是重新打开/关闭进程？如果是后者的话，现在高版本的ACAD启动时间都太慢，没啥意义，而且可以通过ACAD 命令行加参数来自动执行某些程序。
看起来跟楼主那个替换文字的程序是一个系列的哈~

峰云于雾 · 发表于 2016-4-22 18:05:21

好想法，使用效果还不错

峰云于雾 · 发表于 2016-7-11 00:29:18

楼主能否增加一个功能，将不需要的dwg文件从右侧栏目删除，以免误操作。

vbcad · 发表于 2016-7-15 18:18:43

本帖最后由 vbcad 于 2016-7-15 18:20 编辑

峰云于雾发表于 2016-7-11 00:29
楼主能否增加一个功能，将不需要的dwg文件从右侧栏目删除，以免误操作。

解决方法1：可以自己建立一个目录，然后把所要操作的文件放入。

解决方法2：
如果要在本程序中去掉不需要的文件，代码要做修改，要把FILE控件该为LIST控件（或者增加一个LIST控件等于FILE控件的内容，将FILE控件隐藏），然后用循环，查找选中，删除。
LIST控件的删除代码如下。
Private Sub List1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then '按下删除键
For i = 0 To List1.ListCount - 1
   If List1.Selected(i) Then
         List1.RemoveItem (i)
         Exit For
   End If
Next
End If

End Sub

峰云于雾 · 发表于 2016-7-16 18:53:38

vbcad 发表于 2016-7-15 18:18
解决方法1：可以自己建立一个目录，然后把所要操作的文件放入。

解决方法2：

谢谢楼主，我在你的基础上加了那个功能。

yayaya127 · 发表于 2017-8-18 14:55:51

啊啊啊啊，下下来也不会用

cqu20104225 · 发表于 2020-2-2 16:34:15

感谢楼主分享，正是需要的东西，谢谢！

LIULISHENG · 发表于 2020-2-25 10:16:10

给力啊顶你

sunny_8848 · 发表于 2020-2-25 21:08:54

多谢楼主分享，批量操作，效率会高很多

账号		自动登录	找回密码
密码			注册

批量处理DWG文件（调用LSP）源码免费下载

本帖子中包含更多资源

点评