Acet-appid-delete

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(acet-annotation-ss appid)


機能
現在の図面のアプリケーションID(APPID)テーブルから、登録されているアプリケーションIDを削除する。


引数
  • appid … 削除するアプリケーションIDの名前。


戻り値
正常に削除された場合は T、APPID が存在しないか削除に失敗した場合は nil。


サンプル
(defun c:PurgeAppID ( / appname)
  (setq appname "MY_CUSTOM_APP") ; 削除したいAPPID名
  (if (acet-appid-delete appname)
    (princ (strcat "\nAPPID '" appname "' は削除されました。"))
    (princ (strcat "\nAPPID '" appname "' が見つからないか、削除できませんでした。"))
  )
  (princ)
)

関連事項