设为首页收藏本站

晓东CAD家园-论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

楼主: Love-Lisp

[教学] 利用晓东API进行多边形拓扑的应用示例

[复制链接]

签到天数: 1254 天

连续签到: 6 天

[LV.10]以坛为家III

点击这里给我发消息

已领礼包: 142个

财富等级: 日进斗金

发表于 2013-6-24 11:43:48 | 显示全部楼层

Free-Lancer 发表于 2013-6-24 10:29
curve->region也可以修改返回值为选择集

已经返回选择集了。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对
百度谷歌雅虎搜狗搜搜有道360奇虎

使用道具 举报

签到天数: 576 天

连续签到: 4 天

[LV.9]以坛为家II

发表于 2013-6-24 12:28:55 | 显示全部楼层
收集一些思路已是一种学习

点评

借助 xdapi 可以程序执行更有效率,写程序也可以省大量时间,思路有了,完全用A/VLisp也不是不能做到,只不过要投入更多时间写代码。  详情 回复 发表于 2013-6-24 13:41
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 972 天

连续签到: 1 天

[LV.10]以坛为家III

点击这里给我发消息

已领礼包: 1255个

财富等级: 财源广进

发表于 2013-6-24 13:41:41 | 显示全部楼层
QiaoCheng 发表于 2013-6-24 12:28
收集一些思路已是一种学习

借助 xdapi 可以程序执行更有效率,写程序也可以省大量时间,思路有了,完全用A/VLisp也不是不能做到,只不过要投入更多时间写代码。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 58 天

连续签到: 1 天

[LV.5]常住居民I

 楼主| 发表于 2013-6-24 20:10:00 | 显示全部楼层
XDRX_CURVE_INTERSECTBREAK 、XDRX_CURVE->REGION  函数可以返回选择集,代码又精简了!老大的API真是强大啊!
  1. (defun c:t13 ()
  2.   (setq cmd (getvar 'cmdecho))
  3.   (setvar 'cmdecho 0)
  4.   (princ "\n选择直线、多段线、圆弧、圆:")
  5.   (setq ss (ssget '((0 . "line,*polyline,circle,arc"))))
  6.   (if ss
  7.     (progn
  8.       ;;曲线交点打断
  9.       (setq ss (XDRX_CURVE_INTERSECTBREAK ss 0))
  10.       ;;生成面域
  11.       (setq ss (XDRX_CURVE->REGION ss) lst nil)
  12.       (repeat (setq n (sslength ss))
  13.   (setq lst (cons (ssname ss (setq n (1- n))) lst))
  14.       )
  15.       ;;面域按面积从大到小排序
  16.       (setq
  17.   lst (vl-sort
  18.         lst
  19.         '(lambda (a b)
  20.      (> (XDRX_REGION_GETAREA a) (XDRX_REGION_GETAREA b))
  21.          )
  22.       )
  23.       )
  24.       ;;删除最外围的面域
  25.       (entdel (car lst))
  26.       (setq lst (cdr lst))
  27.       ;;将面域转成多段线
  28.       (setq ss (xdrx_region->curve lst))      
  29.       (setvar 'cmdecho cmd)
  30.       ;;返回多段线选择集
  31.       ss
  32.     )
  33.   )
  34. )

点评

麻烦问一下为什么这个多线段不能用 st788796老大写的 统计相同曲线(复制)数量并制表 ,来统计图形呀。。。提示找到0  详情 回复 发表于 2014-6-6 08:03
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 829 天

连续签到: 2 天

[LV.10]以坛为家III

已领礼包: 1357个

财富等级: 财源广进

发表于 2014-6-6 08:03:47 | 显示全部楼层
Love-Lisp 发表于 2013-6-24 20:10
XDRX_CURVE_INTERSECTBREAK 、XDRX_CURVE->REGION  函数可以返回选择集,代码又精简了!老大 ...

麻烦问一下为什么这个多线段不能用  st788796老大写的         统计相同曲线(复制)数量并制表   ,来统计图形呀。。。提示找到0
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 728 天

连续签到: 346 天

[LV.9]以坛为家II

已领礼包: 2067个

财富等级: 金玉满堂

发表于 2016-6-30 18:13:49 | 显示全部楼层
非常青睐这个功能,对于密闭空间的计算很有大作用。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 80 天

连续签到: 1 天

[LV.6]常住居民II

已领礼包: 65个

财富等级: 招财进宝

发表于 2016-11-29 15:49:02 | 显示全部楼层
啥也不说了,感谢楼主分享哇!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 38 天

连续签到: 1 天

[LV.5]常住居民I

已领礼包: 9个

财富等级: 恭喜发财

发表于 2016-12-25 21:12:17 | 显示全部楼层
66666666666666啥也不说了,感谢楼主分享哇!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 16 天

连续签到: 2 天

[LV.4]偶尔看看III

已领礼包: 5个

财富等级: 恭喜发财

发表于 2017-6-16 10:45:39 | 显示全部楼层
晓东api怎么在哪下载?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 16 天

连续签到: 2 天

[LV.4]偶尔看看III

已领礼包: 5个

财富等级: 恭喜发财

发表于 2017-6-16 11:43:22 | 显示全部楼层

xxdrx_setmark 这些没有吧
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 26 天

连续签到: 1 天

[LV.4]偶尔看看III

已领礼包: 22个

财富等级: 恭喜发财

发表于 2017-7-27 21:11:41 | 显示全部楼层
选择直线、多段线、圆弧、圆:
选择对象: 指定对角点: 找到 8 个
选择对象:
; 错误: no function definition: GXL-TIMEINIT
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 26 天

连续签到: 1 天

[LV.4]偶尔看看III

已领礼包: 22个

财富等级: 恭喜发财

发表于 2017-8-2 17:11:07 | 显示全部楼层
你好
http://bbs.xdcad.net/forum.php?m ... p;page=1#pid3467477
这个帖子的函数我调用了一下,api也装过了,不过运行时候提示
错误: no function definition: SXDRX_SETMARK
怎么办?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 1005 天

连续签到: 26 天

[LV.10]以坛为家III

已领礼包: 40个

财富等级: 招财进宝

发表于 2017-8-2 17:14:59 | 显示全部楼层

修改三处


(xxdrx_setmark)  改为 (xdrx_setmark)
(sdrx_setmark)   改为 (xdrx_setmark)
(xxdrx_getss)     改为 (xdrx_getss)
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 26 天

连续签到: 1 天

[LV.4]偶尔看看III

已领礼包: 22个

财富等级: 恭喜发财

发表于 2017-8-2 17:19:44 | 显示全部楼层

非常感谢,还是你厉害
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

签到天数: 73 天

连续签到: 1 天

[LV.6]常住居民II

已领礼包: 124个

财富等级: 日进斗金

发表于 2017-10-6 08:45:12 | 显示全部楼层
这个程序用在哪个方面的?
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|小黑屋|Archiver|手机版|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )  

辽公网安备 21040202000005号

GMT+8, 2018-5-26 23:18 , Processed in 0.431767 second(s), 126 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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