「Vla-get-activelinetype」の版間の差分
(ページの作成：「{{AutoLISP}} ; 構文 : (vla-get-activelinetype ''vla-object'') ; 機能 : ; 引数 :* vla-object … ; 戻り値 : ; サンプル <pre class="brush:autolisp...」) |
細編集の要約なし |
||
| 9行目: | 9行目: | ||
; 引数 | ; 引数 | ||
:* vla-object … | :* vla-object … CAD アプリケーションの VLAオブジェクト | ||
| 18行目: | 18行目: | ||
; サンプル | ; サンプル | ||
<pre class="brush:autolisp;"> | <pre class="brush:autolisp;"> | ||
; VLAオブジェクトから現在の線種を取得する | ; VLAオブジェクトから現在の線種を取得する | ||
(setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) | (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) | ||
(setq ltype1 (vlax-get-property (vla-get-activelinetype *ActDoc*) 'Name)) | (setq ltype1 (vlax-get-property (vla-get-activelinetype *ActDoc*) 'Name)) | ||
2013年3月9日 (土) 16:22時点における版
- 構文
- (vla-get-activelinetype vla-object)
- 機能
- 引数
-
- vla-object … CAD アプリケーションの VLAオブジェクト
- 戻り値
- サンプル
; VLAオブジェクトから現在の線種を取得する (setq *ActDoc* (vla-get-ActiveDocument (vlax-get-Acad-Object))) (setq ltype1 (vlax-get-property (vla-get-activelinetype *ActDoc*) 'Name)) ; 現在の線種を取得する (setq ltype1 (getvar "CELTYPE"))