zzc83 发表于 2013-12-17 17:14:05

快速给直线（或其他图元）增加超链接文字。

快速给增加超链接文字。
如：输入命令，选择直线（或其他图元），输入文字回车，   直线（或其他图元）就带超链接文字了？

snddd2000 发表于 2013-12-17 18:44:39

(defun C:tt (/ ss str)
(while (not ss)
    (setq ss (ssget "_+.:S:E"))
    (if        (and ss (> (sslength ss) 1))
      (progn (setq ss nil) (princ "选择在重叠区域；请重新选择："))
    )
)
(setq str (getstring "超链接文本："))
(if (and str (> (strlen str) 0))
    (seturl (ssname ss 0) str)
)
(princ)
)

香田里浪人 发表于 2013-12-21 18:31:12

好像特性里就有超链接

天命 发表于 2014-1-22 14:07:48

看看能用不

天命 发表于 2014-1-22 14:09:55

不知道路径是绝对的还是相对的
页: [1]
查看完整版本: 快速给直线（或其他图元）增加超链接文字。