「Vla-dock」の版間の差分
(ページの作成:「{{AutoLISP}} ; 構文 : (vla-dock ''vla-object'' ''loc'') ; 機能 : ツールバーを使用中のフレーム ウィンドウにドッキングする。 ; 引数 ...」) |
細編集の要約なし |
||
(同じ利用者による、間の2版が非表示) | |||
27行目: | 27行目: | ||
( T (setq loc acToolbarDockLeft)) | ( T (setq loc acToolbarDockLeft)) | ||
) | ) | ||
(if (setq tb (get-toolbar mgroup name)) | (if (setq tb (vla-get-toolbar mgroup name)) | ||
(progn | (progn | ||
(vla-dock tb loc) | (vla-dock tb loc) | ||
41行目: | 41行目: | ||
関連事項 | 関連事項 | ||
* [[vlax-get-acad-object]] | * [[vlax-get-acad-object]] | ||
* [[get- | * [[vla-get-documents]] | ||
* [[ | * [[vla-get-dockstatus]] | ||
* [[vla-get-menugroups]] | |||
* [[vla-get-toolbars]] | |||
* [[vla-addtoolbarbutton]] | |||
* [[vla-put-visible]] | |||
* [[vla-float]] | |||
* [[vla-dock]] | |||
* [[vla-item]] | |||
[[Category:AutoLISP]] | [[Category:AutoLISP]] |
2015年1月24日 (土) 12:49時点における最新版
- 構文
- (vla-dock vla-object loc)
- 機能
- ツールバーを使用中のフレーム ウィンドウにドッキングする。
- 引数
-
- vla-object … ツールバーの vlaオブジェクト
- loc … AcToolbarDockStatus 列挙型 ツールバーのドッキングする側
- 戻り値
- nil
- サンプル
(defun Toolbar-Dock (mgroup name side / tb loc) (cond ( (= (strcase side) “LEFT”) (setq loc acToolbarDockLeft)) ( (= (strcase side) “RIGHT”) (setq loc acToolbarDockRight)) ( (= (strcase side) “TOP”) (setq loc acToolbarDockTop)) ( (= (strcase side) “BOTTOM”) (setq loc acToolbarDockBottom)) ( T (setq loc acToolbarDockLeft)) ) (if (setq tb (vla-get-toolbar mgroup name)) (progn (vla-dock tb loc) (vlax-release-object tb) ) (princ (strcat "\nツールバー (" name ") なんてねぇよ?")) ) )
関連事項