「Vla-get-gridon」の版間の差分
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-get-gridon ''vla-object'') ; 機能 : ビューポートのグリッドの状態を取得する。 ; 引数 :* vla-object … VLAオブ...」) |
細編集の要約なし |
||
44行目: | 44行目: | ||
* [[vla-get-gridon]] | * [[vla-get-gridon]] | ||
* [[vla-put-gridon]] | * [[vla-put-gridon]] | ||
* [[vla-put-activeviewport]] | |||
* [[vla-regen]] | * [[vla-regen]] | ||
[[Category:AutoLISP]] | [[Category:AutoLISP]] |
2014年6月14日 (土) 22:13時点における最新版
- 構文
- (vla-get-gridon vla-object)
- 機能
- ビューポートのグリッドの状態を取得する。
- 引数
-
- vla-object … VLAオブジェクト(PViewport, Viewport)
- 戻り値
- :vlax-true = グリッドON、:vlax-false = グリッドオフ
- サンプル
(vl-load-com) (defun c:Example_GridOn() ;; グリッドの ON/OFFトグルサンプル (setq acadObj (vlax-get-acad-object)) (setq doc (vla-get-ActiveDocument acadObj)) ;; アクティブビューポートを取得 (setq viewportObj (vla-get-ActiveViewport doc)) (vla-put-GridOn viewportObj (if (= (vla-get-GridOn viewportObj) :vlax-true) :vlax-false :vlax-true)) ;; 変更を反映 (vla-put-ActiveViewport doc viewportObj) (vla-Regen doc acAllViewports) (princ "グリッド表示切り替え") )
関連事項