明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 999|回复: 9

[VBA群] 2013-07-23 明经AutoCAD.VBA编程(45054712) 群聊记录:那是遮掩命令

 关闭 [复制链接]
发表于 2013-7-23 08:38:33 | 显示全部楼层 |阅读模式
巴山夜雨 08:38:33
那是遮掩命令
 楼主| 发表于 2013-7-23 09:40:55 | 显示全部楼层
ppyyff 09:40:55
VBA好像不能实现裁剪功能吧
小学生 09:47:11
肯定能
sqbao 09:48:20
貌似很复杂
ppyyff 09:48:23
您提示下该咋样做
小学生 09:48:59
向命令行发命令
sqbao 09:49:19
sendcommand.
轻舞飞扬 09:49:26
原来一条线+两个点。变成两条线+4个点。自己看着办吧
ppyyff 09:49:33
晕,这样多复杂呀
这个算法很复杂
轻舞飞扬 09:50:01
圆变圆弧
ppyyff 09:50:15
块咋办
轻舞飞扬 09:51:12
块你想让它切就切,不想让它切就不切
ppyyff 09:51:19
填充咋办,
sqbao 09:51:19
vba貌似真没有太好的方法
ppyyff 09:51:27
是的
轻舞飞扬 09:51:51
说白了最好全给你做好了就是最好的方法了
小学生 09:52:26
不只VBA,哪个也没有
ppyyff 09:53:03
昨天我问的复制功能,如何实现将选择集内容复制到剪切板上,我还没弄明白
sqbao 09:53:12
lisp也得弄明亮
遍历
再一个个复制
ppyyff 09:53:39
[qqimg]201307/{ED45FDD9-279F-AD1A-EC58-F22FB69D0F1D}.jpg[/qqimg]
ppyyff 09:54:25
将选择集内容进行复制,但是只是CAD内部复制,可是如何实现将内容复制到一个新文件中去
轻舞飞扬 09:54:30
dim copys(sss1.count-1)
小学生 09:54:51
剪帖板,要用到API
ppyyff 09:54:56
好的,我修改下数据定义
 楼主| 发表于 2013-7-23 10:06:34 | 显示全部楼层
ppyyff 10:06:34
API如何调用,能发一个出来吗
小学生 10:07:10
百度
 楼主| 发表于 2013-7-23 10:17:31 | 显示全部楼层
ppyyff 10:17:31
百度里找不到,使用VBA复制一个选择集的内容到新文件中去的方法
小学生 10:20:11
我以为你要找API的使.
ppyyff 10:20:19
CopyObjects
小学生 10:20:46
对的
ppyyff 10:21:29
但是我不会用
小学生 10:22:37
有样例
 楼主| 发表于 2013-7-23 11:24:36 | 显示全部楼层
ppyyff 11:24:36
谢谢大家,我弄好了
ppyyff 11:25:06
[qqimg]201307/{1DB66566-A789-052B-C307-6ECBF96D93E6}.jpg[/qqimg]
下一步看看裁剪如何弄
ppyyff 11:33:41
以前买了本VBA开发精彩实例里面也没有裁剪的
ppyyff 11:34:48
才发现书面上写了“明经通道强力推荐”
[VBA/VB/C#]efan2000 11:41:27
裁剪的算法很复杂,涉及几十个不同对象之间的裁剪,不是一个实例能搞定的。
狐偃 11:42:01
谁能给开发一下就好了,自己剪太麻烦了
ppyyff 11:42:35
是的
ppyyff 11:43:20
我在网上查了,都查不到,也许是太复杂,所以没人愿意发到网上来
[VBA/VB/C#]efan2000 11:45:21
以前给测绘方面的做过,也只能解决常用的对象类型。
ppyyff 11:46:10
其实就常用的也行了
[VBA/VB/C#]efan2000 11:46:11
特别大数据量时,内、外裁的性能也不是很高。
ppyyff 11:46:42
现在计算都不是问题,大不了开着机子出去玩,
ppyyff 11:48:10
我看到南方那个测绘软件好像可以,这个估计就是您做的吧
[VBA/VB/C#]efan2000 11:48:13
其实主要就是判断点的位置
ppyyff 11:48:18
好像是lisp语言的
无痕/ws 11:48:28
用线绘个框作为裁剪边界,再发个trim命令,用F栏选的方式沿剪切边拦一圈。这样不行吗?
[VBA/VB/C#]efan2000 11:48:37
呵呵,我没做过南方。
[VBA/VB/C#]efan2000 11:49:19
不行,比如,填充的边界没有了,要先还原边界,再裁剪,再填充。
ppyyff 11:50:47
不想用sendcommand
无痕/ws 11:51:09
要做到切干净,是不好弄,好多图块都不好切开。
[VBA/VB/C#]efan2000 11:51:39
边界丢失,VB是解决不了的,需要Lisp或者.NET
ppyyff 11:52:04
用.NET做
有没有.net的比较好用书
我懒得去书店找,你们那个帮推荐一本,我买本学学
[VBA/VB/C#]efan2000 11:55:20
图块的裁剪,要通过坐标变换,判断需不需要重新生成块,新的块可以采用匿名块,比较好。
轻舞飞扬 11:57:37
轻舞飞扬 12:00:58
自己用的,不支持块等觉得复杂的图元就行了。商用的另说
多一步炸开,又不麻烦
ppyyff 12:02:22
块炸开就是了
有些测量图弄了些组合体炸不开,郁闷
ppyyff 12:06:31
吃饭去了
[zhoumh989][x星空]魂 12:15:04
谁知道图层顺序怎么调整
object.MoveToBottom (Objects) 

这俩objsect怎么区别
 楼主| 发表于 2013-7-23 12:55:23 | 显示全部楼层
[zhoumh989][x星空]魂 12:55:23
难道cad2004不能用图层后置的函数
[VBA/VB/C#]efan2000 12:56:26
图层没有前后置,只有对象。
[VBA/VB/C#]efan2000 12:56:59
CAD里的图层仅仅是对象的一个属性,其归类作用。
[zhoumh989][x星空]魂 12:57:39
在cad2004里执行对象后置命令,失效sentityObj.MoveToBottom arr
SortentsTable 对象
[zhoumh989][x星空]魂 13:02:04
在cad2004里执行到最后移动的时候失效了
 楼主| 发表于 2013-7-23 15:28:50 | 显示全部楼层
ppyyff 15:28:50
cad2007以后的版本那个好用点?
小学生 15:32:25
都挺好
小学生 15:35:06
你们现在什么版本的?
ppyyff 15:35:19
2007
小学生 15:36:02
我一直用的08的
09、10、13都偶尔用一下
ppyyff 15:36:58
我们只有04 07 10 11 12 13
小学生 15:37:58
还真不少,只有07是正版吧
ppyyff 15:38:09
全是正版的
不用盗版
小学生 15:38:38
我们全是盗版
ppyyff 15:38:53
还是civil 3D版
小学生 15:40:57
多少钱一套啊?
ppyyff 15:41:35
1万多团购价,今年涨了,好像到1.7万
太黑了
小学生 15:42:33
嘿嘿,好
ppyyff 15:42:38
[qqimg]201307/{B2D7A766-FC01-96E2-DB17-808682D5CC24}.jpg[/qqimg]
小学生 15:42:43
说明程序有价值啊
ppyyff 15:42:44
这多版本
小学生 15:42:56
说明程序员有价值啊
ppyyff 15:43:04
是的
就没国产的做一个
小学生 15:43:42
你们买那多版本干吗用啊
看你们不象是软件公司啊
ppyyff 15:44:03
每年都要买点
我们是设计院
小学生 15:44:56
看样子是钱多,烧的
Jing 15:45:02
上 BIM 的项目多吗?
轻舞飞扬 15:45:47
BIM特指土建
ppyyff 15:46:07
多呀
Jing 15:46:24
大概占总项目的多少?
ppyyff 15:46:36
不买他们产品,他们就发律师函
Jing 15:47:21
你不出BIM设计就没事
Jing 15:48:36
加 BIM 设计费提高 30% ?
ppyyff 15:49:49
主要是单位要弄三维设计,才买了3D版
Jing 15:50:05
你不是设计院?
ppyyff 15:50:15
但是一直没做起来
Jing 15:50:24
[qqimg]201307/{F3710241-B851-5EA6-79E8-AAB91970A634}.gif[/qqimg]
ppyyff 15:52:01
做的也是给领导汇报用的,没有提高生产效益
 楼主| 发表于 2013-7-23 16:05:36 | 显示全部楼层
[liuweiisme]WLIU 16:05:36
批量修改图纸如何做 我单个的已经完成了
 楼主| 发表于 2013-7-23 16:16:33 | 显示全部楼层
?欢乐 16:16:33
做个循环打开各个图纸不就得了……
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-22 23:36 , Processed in 0.191517 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表