金点子定位草图

这几天在用SW画点东西，每次都要将零部件定位在中心，感觉很麻烦，昨晚做了个宏能方便的定位草图，如下：
Move sketch to origin使用说明

程序制作：JERRY HOU
---------------------------------------------

功能描述： 此程序将草图移动至原点。

程序运行要求：在草图中运行此程序

程序运行方法及结果：
1、选择要与草图原点重合的边线，点击按钮，草图中点与原点重合并添加重合关系；
2、点击要与草图原点重合的点，点击按钮，草图选择点移动至原点并添加重合关系；
3、草图在任意位置，全部选择草图，点击按钮，则草图最下边线中点自动与原点重合并添加重合关系；
4、如果在草图中间画一条中心线，点击按钮，则草图自动将中心线原点与原点重合并添加重合关系，如果为多条中心线则取最下边或最右边中心线中点自动与原点重合并添加重合关系；

注意事项：
1、此程序在3D草图，只有第2条适用；
1、不能多轮廓一起移动，每次只能移动一个连续图形或封闭轮廓。

密码jerry

[ 本帖最后由 Jerry hou 于 2006-10-21 08:17 编辑 ]

大家如果觉得好，给小弟顶一个呀。
下面是使用方法：

[ 本帖最后由 Jerry hou 于 2006-10-27 11:36 编辑 ]

试用了一下,确实提高了效率,不错,鼓励实用性的创新.

发现在2007里有点问题，调试了一下；
下面的是在2007里的。

谢楼主奉献如此好的宏，
可是偶用不到，
估计是楼主采用原点名称来选择原点，
加上偶的模版中的原点已被改名为“零零零零”，
因而选择不到名称是“零零零零”的原点，导致失败。

感谢楼主的分享！

原帖由 ｊｘｈａｈａ 于 2006-10-21 18:18 发表
谢楼主奉献如此好的宏，
可是偶用不到，
估计是楼主采用原点名称来选择原点，
加上偶的模版中的原点已被改名为“零零零零”，
因而选择不到名称是“零零零零”的原点，导致失败。

是地，可惜了。呵呵。
("oint1@原点", "EXTSKETCHPOINT", 0, 0, 0, True, 0, Nothing, 0)

原帖由 Jerry hou 于 2006-10-23 13:24 发表


是地，可惜了。呵呵。
("oint1@原点", "EXTSKETCHPOINT", 0, 0, 0, True, 0, Nothing, 0)

增妳一招啦
https://caxhome.com/thread-89270-1-1.html

谢谢正在学习中。

加密下载不到哦~干嘛不让每个想学的人都能看见呢?