画層のコピー
2007/07/10 火曜日 - 19:04:08 by 後藤図面中に存在する画層を別名でコピーするというのが必要になって調べてみた。tblsearch と (command “layer” ・・・・)では画層の設定内容をそのまま引き継ぐのは難しい。ということで、tblobjname を使ってみることにした。できたのがこれ。いつもネットで有用な情報をもらっているので、たまには私からもコードを公開します。
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;引数： lay1 : 元画層名
; lay2 : コピー先画層名
;
;Return： 作成されたエンティティ:成功
; nil:失敗
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun COPY_LAY ( lay1 lay2 / tbl […]