//取得したオブジェクトが、ハッチングだとレイヤーを分ける
//セレクションなどを利用した選択したオブジェクトの場合
string enttype = acEnt.GetType().FullName.ToString();
switch (enttype)
{
case “Autodesk.AutoCAD.DatabaseServices.Hatch”:
break;
default:
break;
}
こんな感じ。
//取得したオブジェクトが、ハッチングだとレイヤーを分ける
//セレクションなどを利用した選択したオブジェクトの場合
string enttype = acEnt.GetType().FullName.ToString();
switch (enttype)
{
case “Autodesk.AutoCAD.DatabaseServices.Hatch”:
break;
default:
break;
}
こんな感じ。
Autodeskのオブジェクトの取得は、autocadが昔から、データベースなので・・
これを、知っていればあまり難しくなかった。
ドキュメント用の入れ物を用意
Document acDoc = Application.DocumentManager.MdiActiveDocument;
選択したドキュメントのデータベースを取得して、ドキュメントの入れ物に入れる。
Database acCurDb = acDoc.Database;
トランザクションを初期化
using (Transaction acTrans = acCurDb.TransactionManager.StartTransaction())
{
テキストスタイル用のテーブル用意
TextStyleTableRecord acTextStyleTblRec;
トランザクションレコードを利用してテキストスタイルを書き込みモード(※読み込みデータの扱いで変化)で開いてレコードをテキストスタイルテーブルのフィールドレコードに入れたものを変数に代入する。
acTextStyleTblRec = acTrans.GetObject(acCurDb.Textstyle,
OpenMode.ForWrite) as TextStyleTableRecord;
トランザクションを確定する
acTrans.Commit();
}
これで、回せばどれもこれもおなじでした。
トランザクション用いないと不都合多発。
VBAのフォームは、c#フォームとなりったけどこちらの方が、非常に楽かもしれない。
呼び出し方は、安易
フォームがf01で作れば
f01 f= new f01();
f.Text = “オブジェクトの取得”;
Application.ShowModelessDialog(f);
これで表示される。
エラートラップは、オブジェクトの取得で非常に多く、tryでも外す場合があるけど、全部につけると煩雑なので、
dllは、voidもしくはobjectで渡して、CASTしていけば、エラーは結構防げたかな?
自サイトの転記だけどこの点の変更はない。
開発して、Autodeskのオブジェクトの種類が必要となったので自分の閉鎖予定のサイトから
転記した。
Autodesk.AutoCAD.DatabaseServicesnosの種類
Autodesk.AutoCAD.DatabaseServicesとは、
ObjectARX 20○○\inc\AcDbMgd.dllの変数で、単一オブジェクトですかね。
これが、結構多い
“Autodesk.AutoCAD.DatabaseServices.MText”
//マルチテキスト
“Autodesk.AutoCAD.DatabaseServices.DBText”
//文字
“Autodesk.AutoCAD.DatabaseServices.Line”
//ライン
“Autodesk.AutoCAD.DatabaseServices.Polyline”
//ポリライン
“Autodesk.AutoCAD.DatabaseServices.Polyline2d”
//ポリライン2D
“Autodesk.AutoCAD.DatabaseServices.Polyline3d”
//ポリライン3D
“Autodesk.AutoCAD.DatabaseServices.Circle”
//円の種類
“Autodesk.AutoCAD.DatabaseServices.Arc”
//円弧
“Autodesk.AutoCAD.DatabaseServices.Spline”
//スプライン
“Autodesk.AutoCAD.DatabaseServices.Hatch”
//ハッチング
//寸法の種類
“Autodesk.AutoCAD.DatabaseServices.Leader”
//引き出し線
“Autodesk.AutoCAD.DatabaseServices.AlignedDimension”
//長さ寸法
“Autodesk.AutoCAD.DatabaseServices.RotatedDimension”
//回転寸法
“Autodesk.AutoCAD.DatabaseServices.RadialDimension”
//半径寸法
“Autodesk.AutoCAD.DatabaseServices.DiametricDimension”
//直径寸法
“Autodesk.AutoCAD.DatabaseServices.LineAngularDimension2”
//2 本の線で定義される角度寸法
“Autodesk.AutoCAD.DatabaseServices.Point3AngularDimension”
//3 個の点で定義される角度寸法
“Autodesk.AutoCAD.DatabaseServices.ArcDimension”
//3 個の点で定義される角度寸法
このぐらいわかっていれば、変換等に苦労しないかな?