Entlast

提供:GizmoLabs - だいたい CAD LISP なサイト
2009年11月22日 (日) 13:38時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(entlast)


機能
図面内の削除されていない最後の主オブジェクト(図形)の名前を返す。
entlast 関数は、command 関数を使用して追加されたばかりの新しい図形の名前を取得する為によく使用される。名前を取得する図形は、必ずしも画面上、またはフリーズ解除された画層上にある必要はない。
引数
  • なし
戻り値
図形名。現在の図面内に図形が存在しない場合は nil。


サンプル
(defun lastent (/ a b) 
  (if (setq a (entlast)) 最後の主図形を取得
    (while (setq b (entnext a)) 次が従属図形の場合は従属図形がなくなるまで (setq a b) ループ 
    ) 
  ) 
  a 最後の主図形または
) 従属図形を返します

関連事項