「Vlax-get-property」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成: ; 構文 : (vlax-get-property ''object'' ''property'') ; 機能 : VLA オブジェクトのプロパティを取得する。 : *この関数は、以前は vlax-get という…)
 
編集の要約なし
13行目: 13行目:
; 戻り値
; 戻り値
: オブジェクトのプロパティの値。
: オブジェクトのプロパティの値。




; サンプル
; サンプル
: まず、ルート CAD オブジェクトのポインタを取得する。
<pre class="brush:autolisp;">
(setq acadObject (vlax-get-acad-object))  
; まず、ルート CAD オブジェクトのポインタを取得する。
(setq acadObject (vlax-get-acad-object))  
  #<VLA-OBJECT IAcadApplication 00a4b2b4>  
  #<VLA-OBJECT IAcadApplication 00a4b2b4>  
: CAD の ActiveDocument プロパティを取得する。
(setq acadDocument (vlax-get-property acadObject 'ActiveDocument))
#<VLA-OBJECT IAcadDocument 00302a18>
: 関数は、現在のドキュメント オブジェクトを返す。
: ActiveDocument オブジェクトの ModelSpace プロパティを取得する。
(setq mSpace (vlax-get-property acadDocument 'Modelspace))
#<VLA-OBJECT IAcadModelSpace 00c14b44>
: 現在のドキュメントのモデル空間オブジェクトを返す。
: 図形を VLA オブジェクトに変換する。
(setq vlaobj (vlax-ename->vla-object e))
#<VLA-OBJECT IAcadLWPolyline 0467114c>
: そのオブジェクトの色プロパティを取得する。
(vlax-get-property vlaobj 'Color)
256


; CAD の ActiveDocument プロパティを取得する。
(setq acadDocument (vlax-get-property acadObject 'ActiveDocument))
#<VLA-OBJECT IAcadDocument 00302a18>
; 関数は、現在のドキュメント オブジェクトを返す。
; ActiveDocument オブジェクトの ModelSpace プロパティを取得する。
(setq mSpace (vlax-get-property acadDocument 'Modelspace))
#<VLA-OBJECT IAcadModelSpace 00c14b44>
; 現在のドキュメントのモデル空間オブジェクトを返す。
; 図形を VLA オブジェクトに変換する。
(setq vlaobj (vlax-ename->vla-object e))
#<VLA-OBJECT IAcadLWPolyline 0467114c>
; そのオブジェクトの色プロパティを取得する。
(vlax-get-property vlaobj 'Color)
256
</pre>
-----
-----
関連事項
関連事項

2013年3月16日 (土) 19:51時点における版

構文
(vlax-get-property object property)


機能
VLA オブジェクトのプロパティを取得する。
*この関数は、以前は vlax-get という名前だった。
引数
  • object : VLA オブジェクト。
  • property : 取得するプロパティの名前を指定するシンボルまたは文字列。
戻り値
オブジェクトのプロパティの値。


サンプル
 ; まず、ルート CAD オブジェクトのポインタを取得する。
(setq acadObject (vlax-get-acad-object)) 
 #<VLA-OBJECT IAcadApplication 00a4b2b4> 

; CAD の ActiveDocument プロパティを取得する。
(setq acadDocument (vlax-get-property acadObject 'ActiveDocument)) 
#<VLA-OBJECT IAcadDocument 00302a18> 

; 関数は、現在のドキュメント オブジェクトを返す。
; ActiveDocument オブジェクトの ModelSpace プロパティを取得する。
(setq mSpace (vlax-get-property acadDocument 'Modelspace)) 
#<VLA-OBJECT IAcadModelSpace 00c14b44> 

; 現在のドキュメントのモデル空間オブジェクトを返す。
; 図形を VLA オブジェクトに変換する。
(setq vlaobj (vlax-ename->vla-object e)) 
#<VLA-OBJECT IAcadLWPolyline 0467114c> 

; そのオブジェクトの色プロパティを取得する。
(vlax-get-property vlaobj 'Color) 
256 

関連事項