Ai apploaded

提供:GizmoLabs - だいたい CAD LISP なサイト
2016年5月31日 (火) 14:23時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (ai_apploaded "NAME" "TYPE") ; 機能 : NEMEで指定したアプリがロードされているかどうかを返す。 : * 旧バージョン...」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(ai_apploaded "NAME" "TYPE")


機能
NEMEで指定したアプリがロードされているかどうかを返す。
* 旧バージョン用の互換として残されている感じなので、現在のバージョンではほとんど使わない。


引数
NAME
アプリケーション名
TYPE
アプリケーションのタイプ "ARX" or "ADS"


戻り値
T = acadapp がロードされている
nil = acadapp がロードされていない


サンプル
; 関数の定義としては以下のとおり
(defun ai_AppLoaded (appname apptype)
  (apply 'or
    (mapcar
      '(lambda (j)
         (wcmatch
           (strcase j T)
           (strcase (strcat "*" appname "*") T)
         ))
         (eval (list (read apptype)))
  ))
)


; 以下使い方。
(ai_AppLoaded "VLIDE" "ARX")
T ; 読み込まれてる


関連事項