AutoCADマクロ屋本舗 掲示板

いつもお世話になっています。
AutoCAD 2026について教えて下さい。
システム変数で半径の寸法補助線だけをオフにしたいのですが
そのようなシステム変数はあるのでしょうか。

システム変数ではなく、寸法スタイルの定義で半径寸法スタイルのみ補助線なしという定義を作成すればいいのではないでしょうか？
寸法スタイル管理→新規作成→寸法スタイルを新規作成のダイアログを開きます。
・開始元を寸法補助線をオフにしたい寸法スタイル
・一番下の「適用先」を「半径寸法」
として続けるをクリックして、寸法線タブで寸法補助線を省略にチェックを入れてOKします。

これで、設定した寸法スタイルにおいては、半径寸法のみ寸法補助線がオフになったスタイルが適用されます。

LUNEさんアドバイスありがとうございます。
新規に半径寸法専用の寸法スタイルを作成し
半径寸法入力前に作成した寸法スタイルに切り替えて、半径寸法入力するということでしょうか。
なるほど、おっしゃる通りできそうです。
しかし、半径入力前に一回一回寸法スタイルを切り替えるのは面倒では。。。
切り替え作業は必須ですよね。

>新規に半径寸法専用の寸法スタイルを作成し
>半径寸法入力前に作成した寸法スタイルに切り替えて、半径寸法入力するということでしょうか。

違います。
1つの寸法スタイルの中に、子スタイルとして、寸法種類別で異なる設定が可能です。

Aという寸法スタイルがあるとして、長さ寸法、角度寸法、半径寸法、座標寸法、引出線と幾何公差それぞれで、一部変更したスタイルを「子スタイル」として登録できます。
そうすると、Aを現在のスタイルとして寸法を作成すると、それぞれの寸法種類に応じて、登録されたスタイルで寸法を作成できます。

寸法スタイルを新規作成のダイアログで、
一番下の「適用先」を「半径寸法」
こうすることで、新しいスタイルを作るのではなく、既存のスタイルに「子スタイル」として登録できます。
※子スタイルを作成した場合、寸法スタイル管理では、添付画像のように表示されます。

ただ、しんちゃんさんの添付画像を見る限り、寸法スタイルがMechanical用のものに思われるので、Mechanicalでは別の設定になるかもしれません。

LUNEさん早々のお返事ありがとうございます。
子スタイルを設定するのですね。

＞ただ、しんちゃんさんの添付画像を見る限り、寸法スタイルがMechanical用のものに思われるので、Mechanicalでは別の設定になるかもしれません。
ご指摘の通リ顧客のMechanical図面をAutoCAD2026で編集設計や部品図作成を行ってるため
AM_JISスタイルを使用しています。
ということは、顧客の図面を開き寸法スタイル管理ダイアログで子スタイルを作成ということですか。
子スタイルの作成をAutoLISPなどでコマンド化はできないですか。

AutoCADのヘルプによれば、「子スタイル」ではなく、「サブスタイル」のようです。
間違えた用語を使用してしまい、申し訳ありません。
https://help.autodesk.com/view/ACD/2024/JPN/?guid=GUID-63835F1C-6BD6-427C-BE1A-94E8908E8F36

>子スタイルの作成をAutoLISPなどでコマンド化はできないですか。
ちょっと調べてみましたが、サブスタイルの作成は難しそうです。
（おそらく拡張データになるのだと思いますが、例となるDXFコード構成も見つけられませんでした）

顧客のデータがMechanical図面ということで、ある程度基本となる寸法スタイル定義が決まっているのなら、それぞれの基本となる寸法スタイルに対し半径寸法のサブスタイルを作成し、各スタイルでの半径寸法を1つ作成してそれをコピー＆ペーストで持っていくのが一番早いと思われます。

LUNEさん、アドバイスありがとうございます。

＞顧客のデータがMechanical図面ということで、ある程度基本となる寸法スタイル定義が決まっているのなら、それぞれの基本となる寸法スタイルに対し半径寸法のサブスタイルを作成＞し、各スタイルでの半径寸法を1つ作成してそれをコピー＆ペーストで持っていくのが一番早いと思われます。
おっしゃる通りの運用でサブスタイプを作成します。
いつもありがとうございます。

選択したオブジェクトの寸法補助線をオフにするのならこんな方法で。（長さ寸法・平行寸法用で作りましたが半径寸法にも使えます）　

寸法補助線をオフ
(if (setq ss (ssget '((0 . "DIMENSION") ))) (command "._dimoverride" "dimse1" "ON" "dimse2" "ON" "" ss ""))

寸法補助線をオン
(if (setq ss (ssget '((0 . "DIMENSION") ))) (command "._dimoverride" "dimse1" "OFF" "dimse2" "OFF" "" ss ""))

※オンがOFFで　オフがONなので、お間違いなく。

寸法関係はグループコードとかでやるとメチャ面倒になるので、コマンドでやるのが簡単。
寸法スタイルを作るのもDIMSTYLEコマンドで出来そうな。出来なさそうな・・・。