Vla-loadarxのソースを表示

{{AutoLISP}}
; 構文
: (vla-loadarx ''vla-object'' ''Name'')


; 機能
:  カスタム オブジェクトを作成する。


; 引数
:* vla-object … 生成する空間のVLAオブジェクト
:* Name … ロードする arx アプリケーションのファイル名を表す文字列


; 戻り値
: nil



; サンプル
<pre class="brush:autolisp;">
(vl-load-com)
(defun c:Example_AddCustomObject()
    ;; モデル空間にカスタムオブジェクトを作成するサンプル
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))

    ; ARXのDLL読み込み
    (vla-LoadArx acadObj "MyARXApp.dll")
    ;(vla-LoadArx acadObj "MyARXApp.arx") ; .arxw

    ; MyNewObject でカスタムオブジェクトを追加    
    (setq customObj (vla-AddCustomObject (vla-get-ModelSpace doc) "MyNewObject"))
)

</pre>

-----
関連事項
* [[vlax-get-acad-object]]
* [[vla-get-activedocument]]
* [[vla-addcustomobject]]


[[Category:AutoLISP]]