選択したポリラインデータのテーブルを生成するAutoLISP関数

選択したポリラインデータの表を生成する AutoLISP 関数

選択したポリラインオブジェクトの頂点座標、セグメント長（中間距離）、面積、および周囲長を含む表を作成します。
コマンド名: pLgn
RAR パスワード: www.cizimokulu.com
以前 cizimokulu.com フォーラムで共有されたこの関数は、ユーザーからの要望に基づいて修正・拡張され、今回再導入されました。
開発者仲間が実装の詳細を確認・追跡できるように、ソースコードはオープンな形式で提供されています。
アーカイブから pLgn.lsp ファイルを AutoCAD の Support フォルダに解凍し、APPLOAD を使用するか、AutoCAD のコマンドラインから以下を入力してロードしてください：
(load "pLgn.lsp")
正常に動作させるには、ユーザーが AutoCAD のフォルダに対して十分なアクセス権限を持っている必要があります。

---

選択セット内のすべての LwPolyline オブジェクトは、以下のように順次処理されます：
複数のポリゴンが選択されている場合、各ポリゴンに固有の番号が割り当てられ、その幾何中心にラベルが配置されます。
ポリゴンが 1 つだけ選択されている場合は、ポリゴン番号は適用されません。
各ポリゴンについて：
頂点が 1 から始まる連番でナンバリングされます。
これらの点番号はポリゴン上と生成された表内の両方に表示され、座標データと図面上の点を直接対応させることができます。
すべてのポリゴンについて、指定された小数点以下の精度を使用して以下のデータが計算され、表に書き込まれます：

点番号
頂点座標
セグメント距離
面積
周囲長

ポリゴンの頂点座標は、現在の UCS（ユーザ座標系）で計算および表示されます。
複数のポリゴンが選択されている場合：

一連のプロセスが各ポリゴンに対して繰り返されます。
各ポリゴンに識別番号が割り当てられます。
すべてのポリゴンの処理が完了すると、以下を示す「ポリゴンサマリー表」が生成されます：
ポリゴン番号
面積
周囲長
合計面積
合計周囲長

選択が完了すると、図面は自動的に適切なビューにズームし、完成した表をドラッグして目的の位置に配置できるようになります。
各ポリゴンは適切なズームレベルで個別に表示され、対応する表の配置点を指定するようユーザーにプロンプトが表示されます。
最後のポリゴンサマリー表が表示され、配置されると、関数は完了します。
単一のポリラインのみが選択されている場合：
ポリゴンサマリー表は作成されません。
ポリゴン番号は割り当てられません。
幸運を祈ります。
アップデート：
エラー処理ルーチンが再設計され、改善されました。
LwPolyline に加え、標準のポリラインオブジェクトのサポートが追加されました（3D ポリラインオブジェクトの場合は XY 平面投影を使用して処理されます）。
この関数は独自の DCL ファイルを生成するため、AutoCAD のフォルダに対する十分な権限が必要であるか、AutoCAD を管理者として実行する必要があります。
以前のロードおよび実行に関する問題を最小限に抑えるため、アーカイブには PLgn.vlx バージョンも含まれるようになりました。

作成者: cizimokulu.com
説明: 選択したポリラインデータのテーブルを生成するAutoLISP関数
タグ: 選択したポリラインオブジェクトの頂点座標、セグメント長（中間距離）、面積、および周囲長を含むテーブルを作成します。

ダウンロード