[求助]：请大虾看看代码有何问题？该如何实现？

jinsong-liao · 发表于 2005-4-15 09:40:19

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

请大虾看看代码有何问题？
如图所示：
pt1,pt2为多义线的连续两顶点，
midpt为两顶点中点座标，
angfw为本段角度，
想实现的是，当多义线长度大于等于4时，在其中点写字符串，同时用字符串
剪切遮盖的线，使文字漏空，请教下面程序有何问题，该如何实现？

(if (>= (distance pt1 pt2) 4)
      (progn
         (command "text" "j" "m" midpt "1" angfw "gxdm")
         (setq wz (entlast))
         (command "trim" wz midpt)
      )
)

jinsong-liao · 发表于 2005-4-15 09:41:21

图2

ljpnb · 发表于 2005-4-15 10:28:04

[PHP]
(if (>= (distance pt1 pt2) 4)
(progn
(command "text" "j" "m" midpt 1.0 angfw "gxdm");_"1"改为1.0
(setq wz (entlast))
(command "trim" wz "" midpt "");_少两对""
)
)[/php]

jinsong-liao · 发表于 2005-4-15 11:58:46

还是有问题，显示“无法修剪此对象”，是否通过中点座标来确定被剪切的对象不行？

ljpnb · 发表于 2005-4-15 12:22:49

我倒给忘了，这句(command "trim" wz "" midpt "")有错，当中的midpt是不行了，一定要(list “要剪切的图元名" midpt)才行

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：请大虾看看代码有何问题？该如何实现？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子