[测试]：关于XDRX_API的BUG,请到此贴下发表

taner

newer 发表于 2018-7-6 14:42
检查下填充的边界，你点填充，看有面积没？
别自交，边界。

可以填充,并且,用HATCHEDIT,在19版没法生成面域,在07版,能生成面域!

XDSoft

taner 发表于 2018-7-6 11:13
(xdrx_hatch->region (ssget))出错

你这个填充没有面积，说明边界有自交



用下面代码生成边界

1. (defun c:tt ()
   
2.   (if (and (setq e (car (xdrx_entsel "\n选取填充<退出>:" '((0 . "hatch")))))
   
3.            (setq loops (xdrx_getpropertyvalue e "getloops" t))
   
4.       )
   
5.     (progn (setq ss (xdge::entity:make loops))(xdge::free ss))
   
6.   )
   
7.   (princ)
   
8. )
   

(defun c:tt ()<br />   (if (and (setq e (car (xdrx_entsel "\n选取填充<退出>:" '((0 . "hatch")))))<br />            (setq loops (xdrx_getpropertyvalue e "getloops" t))<br />       )<br />     (progn (setq ss (xdge::entity:make loops))(xdge::free ss))<br />   )<br />   (princ)<br /> )<br />

你PEDIT连接下，看看哪个地方有自交。

taner

XDSoft 发表于 2018-7-6 15:31
你这个填充没有面积，说明边界有自交

(vl-cmdf "-hatchedit"(car(entsel)) "b" "r" "n"),在07版中OK,但在18/19版中就不行.

另外,执行你上面的代码后,用PEDIT也没发现异常.

taner

20180718 AP1  测试:

1.(xdrx_hatch_mkbpoly (ssget)nil nil)与(xdrx_hatch_mkbpoly (ssget)nil t)返回的结果都是实体表

2.xdrx_hatch_make仍有些问题,表现如附图说明.

XDSoft

taner 发表于 2018-7-18 15:46
20180718 AP1  测试:

1.(xdrx_hatch_mkbpoly (ssget)nil nil)与(xdrx_hatch_mkbpoly (ssget)nil t)返回 ...

1、xdrx_hatch_make 加参数 t 就是生成整体HATCH的选项，因为是整体的，所以生成的就是一个HATCH，所以返回的是实体名，为了后续修改这个HATCH属性方便，如果需要关联的边界，可以用命令: (setq a (xdrx_getpropertyvalue (entlast) "assocobjids"))
(<图元名: 7ff406705460> <图元名: 7ff406705470>)

很方便的得到。
反而，如果要把边界和整体的HATCH生成一个选择集，提取他们还要费代码了。

2、xdrx_hatch_mkbpoly 现在和 xdrx_hatch_remake 是一样了，第一个参数开关不起作用了，生成的都是关联的HATCH，考虑到填充还是关联了边界好，不关联没实际用途。之所以没取消第一个开关，是为了兼容以前写过的LISP程序。

3、也可以一个参数都不给，下个版本的API，今后统一了，返回是选择集还是实体表，由系统变量设置决定
用函数前，可以设置：  (xdrx_setvar "retentlist" 1)， 后，所有的返回选择集的API函数都可以返回实体表了。

newer

taner 发表于 2018-7-18 15:46
20180718 AP1  测试:

1.(xdrx_hatch_mkbpoly (ssget)nil nil)与(xdrx_hatch_mkbpoly (ssget)nil t)返回 ...

命令: (xdrx_setvar "retentlist" 1)
1

命令: (setq a (xdrx_entity_copy (ssget) (getpoint)(getpoint)))

选择对象: 指定对角点: 找到 3 个

选择对象:  (<图元名: 7ff4a3805320> <图元名: 7ff4a3805330> <图元名: 7ff4a3805340>)

命令: (xdrx_setvar "retentlist" 0)
0

命令: (setq a (xdrx_entity_copy (ssget) (getpoint)(getpoint)))

选择对象: 指定对角点: 找到 3 个

选择对象:  <Selection set: 2f>

taner

命令: (xdrx_setvar "retentlist" 1)
nil   为什么呢?

newer

taner 发表于 2018-7-19 09:03
命令: (xdrx_setvar "retentlist" 1)
nil   为什么呢?

老大不是说了，等下个版本API后嘛

taner

(xdrx_mpolygon->region(ssget))结果不对，少了边界！

(xdrx_mpolygon->region(ssget)) 删除原边界
(xdrx_mpolygon->region(ssget)t)保留原边界，与说明相反

taner

如附件:
执行(xdrx_mpolygon_make ss_of_seg(ssget))后出错,如图一

出错后,青色的线,没法选中!(删不掉)

newer

taner 发表于 2018-7-27 21:40
如附件:
执行(xdrx_mpolygon_make ss_of_seg(ssget))后出错,如图一

先检查下那根线是否异常，比如自交。

newer

taner 发表于 2018-7-27 16:26
(xdrx_mpolygon->region(ssget))结果不对，少了边界！

(xdrx_mpolygon->region(ssget)) 删除原边界

MPOLYGON一般作为中间对象，所以 HATCH,REGION,CURVE等转 MPOLYGON的函数，默认都保留原来的，
而MPOLYGON 转到 HATCH,REGION,CURVE等的，转后，默认都是删除MPOLYGON

taner

newer 发表于 2018-7-27 21:46
先检查下那根线是否异常，比如自交。

找到问题了,有重线!炸开,OVERKILL,PEDIT后再执行OK.但xdrx_mpolygon->region确实是有问题!(上上楼)

newer

taner 发表于 2018-7-27 21:50
找到问题了,有重线!炸开,OVERKILL,PEDIT后再执行OK.但xdrx_mpolygon->region确实是有问题!(上上楼)

你说的那个上上楼，在排查

XDSoft

taner 发表于 2018-7-27 21:50
找到问题了,有重线!炸开,OVERKILL,PEDIT后再执行OK.但xdrx_mpolygon->region确实是有问题!(上上楼)

请测试下 2018.07.28日更新的API。