Vla-put-thickness

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(vla-put-thickness vla-object num)


機能
vla-object の厚さを設定する。


引数
  • vla-object … VLAオブジェクト
  • num … 数値(倍精度浮動小数点数型)


戻り値
nil


サンプル
; 選択図形のVLAオブジェクト
(setq obj1 (vlax-ename->vla-object (car (entsel))))

; VLAオブジェクトから図形のプロパティ取得
; 一般プロパティ
(vla-get-color obj1) ; 色
256
(vla-put-color obj1 128)


(vla-get-layer obj1) ; 画層
"0"
(vla-put-layer obj1 "DEFPOINTS")


(vla-get-linetype obj1) ; 線種
"BYLAYER"
(vla-put-linetype obj1 "HIDDEN")


(vla-get-linetypescale obj1) ; 線種尺度
1.0
(vla-put-linetypescale obj1 0.5)


(vla-get-plotstylename obj1) ; 印刷スタイル名
"ByLayer"
(vla-put-plotstylename obj1 "Styel_1")


(vla-get-lineweight obj1) ; 線の太さ
-1
(vla-put-lineweight obj1 18)


(vla-get-hyperlinks obj1) ; ハイパーリンク
#<VLA-OBJECT IAcadHyperlinks 0000000031d12168>

(vla-get-entitytransparency obj1) ; 透過性
"ByLayer"
(vla-put-entitytransparency obj1 50)

(vla-get-thickness obj1) ; 厚さ
0.0
(vla-put-thickness obj1 1.0)


(vla-get-material obj1) ; 3Dマテリアル
"ByLayer"
(vla-put-material obj1 "GLOBAL")

関連事項