エキスの層色

[Gio_S]

全てにこんにちは、レイヤー(名前を知る)から抽出する最も簡単な方法は、最終的にその色のエンティティティを「バイレイラ」に色付けするために割り当てられた色をリスペクトします。 (lisp、vlaなし)
お問い合わせ

 

[rpor66]

(defunのfnlayers(/l x))
(vlax-for x (vla-get-layers (vla-get-activedocument(vlax-get-acad-object))))))))))
(setq l (append l (list (vla-get-name x)))))))))))
)
ログイン
)

関数は、平面名と関連する色によって形成されたリストを返します
ログイン

 

[rpor66]

"no vla", remedy" に気付きませんでした。

(defun fnlayers(/ループnomeカラーリスト))
(setq ループ (tblnext "layer" t)))
( while ループ)
(setq nome (cdr (nth 1 ループ))))))
(setq colore (cdr (nth 3 ループ))))))
(setq lista (list (list nome colore))) を追加しました))
(setqループ(tblnext "layer")))
)
リストア
)

 

[Gio_S]

お問い合わせ 私はそのサポートを持っていない、私は古典的なリスペックを使用しています。
お問い合わせ それはあなたが私に美しい "ready"を与えたループで分裂にヒントする前に、それは私の疑問でした 私は、オブジェクトの層の名前を抽出した後、レイヤーに直接指すことができないことを理解していますが、右側を見つけて内部で「見る」まで歩いてください。 多くのサイクル, 私は非常に多くのオブジェクトを調べるために持っている場合...それはすべてです, 私はstlで私のコンバーターを改善しているので. 現時点では、その色を使っているのですが、その場合は「bylayer」というと、その機能に頼らなければなりません。 お問い合わせ

 

[GP.]

...オブジェクトの層の名前を抽出した後、レイヤーに直接ポイントします。 . . .

e' possibile の con:
(cdr (assoc 62 (tblsearch "layer"nomelayer)))))))

 

[Gio_S]

ありがとうございます。 そういうものを使わなくてはならず、オブジェクトだけを操作するのに使われています。

 

[Gio_S]

パーフェクト, 私の古いオートリスプで:

(例: "3dface" (cdr(assoc 0 alist)))))
(progn)
(= 256 (cdr (assoc 62 alist))) の場合)
(setq色(rtos (cdr (assoc 62 (tblsearch "layer" (cdr (assoc 8 alist))))))))))))))))))))))
(setq色(rtos (cdr)))))
)........................................................................................................................

 

[Cad-Revit]

パーフェクト, 私の古いオートリスプで:

(例: "3dface" (cdr(assoc 0 alist)))))
(progn)
(= 256 (cdr (assoc 62 alist))) の場合)
(setq色(rtos (cdr (assoc 62 (tblsearch "layer" (cdr (assoc 8 alist))))))))))))))))))))))
(setq色(rtos (cdr)))))
)........................................................................................................................

好奇心だけ。 autocad では、選択を autolisp にすると、色が強制されていない場合は、コード 62 はアクティブではなく、それ以外の場合は、(62 . 256) は、別のケードの「フルーツ」でなければなりません。 実際には gio_s によって使用されるソフトウェアの中には、intellicad、互換性のある autolisp がありますが、vla-vlax の機能には使用していません。 私はナンセンスを述べた場合、専門家は私を正しく排除します。

 

[Gio_S]

私はまた、その層の色に研究を拡張する前に、実際には、intellicadによって確信しました, 明らかに私は顔の62が私にニルを返すしなかったことをテストしました.
代わりに(私はいつもintellicadのために話します) 62 が常に 256 件を返すように気づいた。 データベースのみ。 顔のdxfに表示されませんが、デザインの設定のすべてのセクションにあります。

 

[Gio_S]

stlを使って印刷する人のための小さな好奇心、色に最小限と相対的なので、ここでそれを借ります。
すでに、単一の精度でモバイルコンマがサポートされていないため、Autolispからstlトラックを生成する可能性について議論しました(それらは「ダブル」のみを生成します)。 バイナリスレートは「単一」形式でデータを望んでいます。
最後に、私は監視し、cadの基本的な日付から時間を実行するためにコンパイルする私のパーサーで、作業中に迅速な検証を可能にするために、私は、Aciiタイプstlを生成するためのコンテンツでした、非常に簡単に書きます。
その後、コンパクトなバイナリファイルを作る別の言語でツールを呼び出します。 それを記述するよりも実行されるべき端のシステム。
パーツの外観検査を容易にするために不可欠な色が欠けていました。なぜなら、Ascii stlはサポートしていません。 最後に、テキストをつけて別の中間フォーマットを発明したくないので、Asciiを経由してトラックの色を「cacciare」する方法を見つけました。
asciiで色を無視するプログラムをクリアに読み込みますが、それらは間違って行くことはありませんし、私は周りのすべてのSWで読むことができるファイルasciiですが、また色を失うことなくバイナリを埋めます:
"endfacet" を閉じた後に色のコーディングをスローするのに十分です。 はっきりポインター「カッドカラー」を発明しました。 発見者は誰にも邪魔しないということです。

 ノーマルファセット -0.23379819 0.20359900 -0.95072912
外部ループ
頂点 3.70767496 -2.34397192 -4.4987455
頂点 3.68773415 -1.27682691 -4.26531230
頂点 4.25378586 0.00000000 -4.13107972
エンドループ
エンドファセットカラー 700000000