「Vla-get-top」の版間の差分
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-get-top ''vla-object'' ) ; 機能 : ツールバーの上端座標を取得します。 ; 引数 :* vla-object … ツールバーアイ...」) |
細編集の要約なし |
||
| 22行目: | 22行目: | ||
(setq *toolbars* (vla-get-toolbars *cmenu*)) | (setq *toolbars* (vla-get-toolbars *cmenu*)) | ||
( | (setq tbtop (vla-get-top (vla-item *toolbars* 1)) | ||
(vla-put-top (vla-item *toolbars* 3) (+ tbtop 50)) | (vla-put-top (vla-item *toolbars* 3) (+ tbtop 50)) | ||
2013年7月15日 (月) 12:13時点における最新版
- 構文
- (vla-get-top vla-object )
- 機能
- ツールバーの上端座標を取得します。
- 引数
-
- vla-object … ツールバーアイテムの VLAオブジェクト
- 戻り値
- 座標値
- サンプル
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) (setq *cmenu* (vla-item (vla-get-menugroups (vla-get-application *ActDoc*)) "ACAD")) (setq *toolbars* (vla-get-toolbars *cmenu*)) (setq tbtop (vla-get-top (vla-item *toolbars* 1)) (vla-put-top (vla-item *toolbars* 3) (+ tbtop 50))
関連事項