Civil:pgroups-get-uniquepointnumber

提供:GizmoLabs - だいたい CAD LISP なサイト
2024年11月15日 (金) 07:56時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(Civil:pgroups-uniquepointnumber )


機能
ユニークな、まだ使われていない点番号を返す。


引数
  • なし


戻り値
1以上の整数。エラーの場合は nil


サンプル
(vl-load-civil)
T
(setq res (civil:pgroups-set-lastusedpointnumber 100))
T
(setq res (civil:pgroups-get-lastusedpointnumber))
100
(setq res (civil:pgroups-get-uniquepointnumber))
100



関連事項