关于图元在直线网格居中的构思与实现(While-2020.11.16 11 ：21)

fangmin723

最开始是看到封闭表格内图元居中 - AutoLISP/Visual LISP 编程技术 - CAD论坛 - 明经CAD社区 - Powered by Discuz! (mjtd.com)这个帖子后，有人回复如果能批量操作就好了。

代码中，用到的直线消重是从[原创]更新：消除合并重复线条程序！修正了一个错误！ - AutoLISP/Visual LISP 编程技术 - CAD论坛 - 明经CAD社区 - Powered by Discuz! (mjtd.com)分离出来的！！！

在【封闭表格内图元居中】的帖子中，利用给出的代码，实现了批量操作，但是效果不尽如此人意。使用bpoly函数，不能操作太多的图元。

于是参考之前黄大师的一些经验，结合之下开始了新的构思，历经四五天实现了如下初步效果：（暂未提供实现图元居中的小部分代码）

fangmin723

xyp1964 发表于 2020-11-26 16:57
附图感觉有错：
http://bbs.mjtd.com/forum.php?mod=attachment&aid=MTExOTU2fGFmNmY1ZmZlMDY5Yzg5ZWUwZDU2ZDI1MTA3Y2YxY2Y0fDE3MTM0NDAxOTY%3D&request=yes&_f=.png

这个图形比较复杂，不知道是我这边的CAD的问题，还是什么问题，暂时没有时间和精力去细究！！！

xyp1964

附图感觉有错：
http://bbs.mjtd.com/forum.php?mod=attachment&aid=MTExOTU2fGFmNmY1ZmZlMDY5Yzg5ZWUwZDU2ZDI1MTA3Y2YxY2Y0fDE3MTM0NDAxOTY%3D&request=yes&_f=.png

fangmin723

lxl217114 发表于 2022-11-2 12:36
希望楼主发布实现最后一张图片里的程序

已经实现了啊，只不过没有上传完整的而已，况且那后面的也不难，这不是想着给你们个提升自己的机会么

yoyoho

谢谢! fangmin723 分享程序!!!!!

flybike007

厉害啦

wudechao

下载后的文件是坏的，无法打开！

fangmin723

wudechao 发表于 2020-11-26 15:17
下载后的文件是坏的，无法打开！

http://bbs.mjtd.com/forum.php?mo ... hlight=%CF%C2%D4%D8

fangmin723

已经更新，已经下载的，重新下载下！！！

tigcat

顶一下。谢谢分享

czb203

谢谢! fangmin723 分享程序!!!!