bpoly函数的应用问题：如下代码，bpoly函数点选区域，区域必须在当前视口内，当区域较多时，所有区域位于当前视口，图形比较小，循环执行代码时cad就会提示：未找到有效的图案填充区域，函数执行不成功，有没有办法解决，是不是有系统变量控制，请教了。
(if (bpoly pt)
(progn
(setq bdy (vlax-Ename->vla-object (entlast)))
(vla-getboundingbox bdy 'LL 'UR)
(vla-delete bdy)
(setq LL (vlax-safearray->list LL)
UR (vlax-safearray->list UR)
)
)
)网友答: 函数用法:
(bpoly pt [ss vector])
(bpoly pt ss '(1 0)) pt 点 ss边界对象选择集 '(1 0) 向量 这样就可以不用在当前视图了！
网友答: 在AutoLISP的(bpoly pt [ss vector])函数中，当vector参数设置为'(1 0)时，表示一个二维向量，其方向为X轴正方向（水平向右），长度为1单位。该向量用于定义边界图案填充的生成方向，具体表现为：
‌方向控制‌：向量(1 0)的X分量为1、Y分量为0，表明填充图案将沿X轴正方向（水平向右）对齐。
‌长度影响‌：向量的模（长度）决定填充图案的缩放比例。此处长度为1（√(1²+0²)=1），表示使用图案定义的原始比例，不进行缩放
‌功能关联‌：在bpoly命令中，此向量可能用于指定边界检测的参考方向或填充生成时的基准方向，确保生成的填充图案与指定方向一致
类似地，若向量为'(0 1)则表示垂直向上方向，而'(1 1)则代表45度斜向方向网友答:
帅哥加个QQ呗569893370，帮我写个用BO命令点取内部点提取边界到任意位置的LSP网友答: 那就每次都将BPOLY所需区域变为当前视口网友答: Gu_xl 是高啊，感谢网友答: 问题是ss事先不知道啊网友答: 问题解决了，非常感谢网友答: 怎么解决的？能否给大家分享下！网友答: 就是照版主说的做啊网友答: 以为你发现新大陆了呢！！网友答:
(bpoly pt ss '(1 0)) 按照你的函数说明使用,但依然部分生成封闭线会报错,提示 "点在对象上.""点在边界之外."
(if (bpoly pt)
(progn
(setq bdy (vlax-Ename->vla-object (entlast)))
(vla-getboundingbox bdy 'LL 'UR)
(vla-delete bdy)
(setq LL (vlax-safearray->list LL)
UR (vlax-safearray->list UR)
)
)
)网友答: 函数用法:
(bpoly pt [ss vector])
(bpoly pt ss '(1 0)) pt 点 ss边界对象选择集 '(1 0) 向量 这样就可以不用在当前视图了！
网友答: 在AutoLISP的(bpoly pt [ss vector])函数中，当vector参数设置为'(1 0)时，表示一个二维向量，其方向为X轴正方向（水平向右），长度为1单位。该向量用于定义边界图案填充的生成方向，具体表现为：
‌方向控制‌：向量(1 0)的X分量为1、Y分量为0，表明填充图案将沿X轴正方向（水平向右）对齐。
‌长度影响‌：向量的模（长度）决定填充图案的缩放比例。此处长度为1（√(1²+0²)=1），表示使用图案定义的原始比例，不进行缩放
‌功能关联‌：在bpoly命令中，此向量可能用于指定边界检测的参考方向或填充生成时的基准方向，确保生成的填充图案与指定方向一致
类似地，若向量为'(0 1)则表示垂直向上方向，而'(1 1)则代表45度斜向方向网友答:
Gu_xl 发表于 2013-5-28 12:56
函数用法:
(bpoly pt [ss vector])
帅哥加个QQ呗569893370，帮我写个用BO命令点取内部点提取边界到任意位置的LSP网友答: 那就每次都将BPOLY所需区域变为当前视口网友答: Gu_xl 是高啊，感谢网友答: 问题是ss事先不知道啊网友答: 问题解决了，非常感谢网友答: 怎么解决的？能否给大家分享下！网友答: 就是照版主说的做啊网友答: 以为你发现新大陆了呢！！网友答:
Gu_xl 发表于 2013-5-28 12:56
函数用法:
(bpoly pt [ss vector])
(bpoly pt ss '(1 0)) 按照你的函数说明使用,但依然部分生成封闭线会报错,提示 "点在对象上.""点在边界之外."