c735023723 发表于 2012-8-17 00:04:12

测量同行啊

longer1000 发表于 2012-8-18 08:26:39

测量同行啊

461045462 发表于 2012-8-18 09:47:28

请问楼上:
sslist 函数要怎样加?
谢谢!

dalin1985 发表于 2012-8-18 20:56:38

461045462 发表于 2012-8-18 09:47 static/image/common/back.gif
请问楼上:
sslist 函数要怎样加?
谢谢!

(defun sslist (f_sel) ;converts a selection set to a list of enames
(if f_sel
    (progn
(if (/= (type f_sel) 'PICKSET)
    (exit)
)
(setq        f_ss_list nil
        f_loop -1
)
(repeat (sslength f_sel)
    (progn
      (setq f_loop (1+ f_loop))
      (princ (strcat "\rSorting " (itoa f_loop) " of " (itoa (sslength f_sel)) "   "))
      (setq f_ss_list (append f_ss_list (list (ssname f_sel f_loop))))
    )
)
)
    nil
    )
)
;eg (sslist (ssget)) = (<Entity name: 40061d70> <Entity name: 40061d68>)

dalin1985 发表于 2012-8-18 20:57:43

站内找的,也不知道对不对

461045462 发表于 2012-8-18 21:13:09

dalin1985 发表于 2012-8-18 20:57 static/image/common/back.gif
站内找的,也不知道对不对

谢谢楼主提供的sslist 函数
等会试试。
谢谢!

461045462 发表于 2012-8-19 14:44:41

dalin1985 发表于 2012-8-18 20:57 static/image/common/back.gif
站内找的,也不知道对不对

dalin1985 您好:
加上函数,运行总图,生成的东西不知道哪里去了?
命令: test
选择对象: 指定对角点: 找到 89 个
已滤除 88 个。
Sorting 0 of 1   (T)

或许是操作不妥。
请指教。
谢谢!

dalin1985 发表于 2012-8-19 15:29:57

461045462 发表于 2012-8-19 14:44 static/image/common/back.gif
dalin1985 您好:
加上函数,运行总图,生成的东西不知道哪里去了?
命令: test


我用也是,我也没有用他的,我是自己写的

461045462 发表于 2012-8-19 15:58:09

dalin1985 发表于 2012-8-19 15:29 static/image/common/back.gif
我用也是,我也没有用他的,我是自己写的

dalin1985 您好:
轻轻地请问一句,您的成果能否分享
谢谢!

xujinhua 发表于 2012-8-19 21:42:00

同行啊...同需要。。谢谢各位
页: 1 [2] 3
查看完整版本: 求助---------宗地图批量另存(已解决)请看22楼