・
シンボルテーブルにシンボル名が有るかどうか調べる
・ ブロック名が使われているか調べる
・ 画層名が使われているか調べる
・ 線種名が使われているか調べる
・ 文字スタイル名が使われているか調べる
ブロック名が使われているか調べる
(if (tblsearch "BLOCK" "ブロック名")
(princ "\nこのブロック名はすでに使われています")
(princ "\nこのブロック名は使われていません")
)
画層名が使われているか調べる
(if (tblsearch "LAYER" "画層名")
(princ "\nこの画層名はすでに使われています")
(princ "\nこの画層名は使われていません")
)
線種名が使われているか調べる
(if (tblsearch "LINETYPE" "線種名")
(princ "\nこの線種名はすでに使われています")
(princ "\nこの線種名は使われていません")
)
文字スタイル名が使われているか調べる
(if (tblsearch "STYLE" "文字スタイル名")
(princ "\nこの文字スタイル名はすでに使われています")
(princ "\nこの文字スタイル名は使われていません")
)