クローズドポリライン内のテキストの迅速な移動

[Mano63]

おはようございます。
クローズドポリラインの幾何学的中心からテキストのシフトの実行を加速させるのに役立ちます(一日あたりのセンチナ)。
図のように(私は明確に願っています)、黄色の矢印で示されている点のクリックで(...一般的な点は、ダッシュによって強調されたダイヤル内にあるだけです)私は、図「3 - 最後の状態」で示されている位置のテキストのシフトを取得するしたいと思います。
可能であれば、作業をスピードアップするために、コマンドはシーケンスシフトを可能にするためにアクティブのままにする必要があります。

"post" というレイヤーで使用しているポリラインが常にあることを追加し、"mq" というレイヤーにテキストが常にある。

証拠を容易にするためにdwgを付けます。
お問い合わせ

 

[sgreender]

必要なもの
中間の nn のテキストを持つオブジェクトはブロックすることができます... その時点ですべてのブロックを選択し、テキストの座標を変更します。
または複数行のテキストを編集し、「右上」または「左下」で編集します。
または、すべてのテキストを選択し、@lung<angleに移動して、関心のある場所に移動する何かを作成することができます。
あなたがしなければならないことを実際に知らずに、それらを投げたヒントです

 

[rpor66]

コマンドの前に、常にアクティブな add_multiple を 設定したい場合。
よい仕事。

 

[Mano63]

@rpor66さんのツイートお問い合わせ 1000 感謝!@グリーンダー: 皆様のお越しをお待ちしております。 私の平面は、他のものと異なる1を閉鎖ポリラインによってポップされています。 表面平方メートルのそれぞれのための徴候をできるだけ早く得るため それぞれの幾何学的中心にある、選択したすべてのポリラインの領域を私に書き込む lisp を使用します。 最初の問題は、これらのテキストが、幾何学的中心を占めるということは、すでにポリラインの中に存在する他のテキストを重ねていました。 2つ目の問題は、さまざまな領域を識別するテキストによってポリラインの内側の角が占められていることだった。 rpor66 のコマンドで、さまざまなポリライン内の他のテキスト/オブジェクトから角に向かって正方形を表現するテキストを "draw" することができます。 残念ながら、ブロックを使用して、これは複雑になります。 . . .
ありがとうございました!

 

[Mano63]

お問い合わせ
あなたのリスペスを練習して私に少し問題を与えます。 テスト用のdwgを取り付けます。 残念ながら、丸い状況(以下参照)
"npost" レイヤーにシアンカラーテキストを移動します(矢印で示します)。 コマンドは "mq" レイヤーのテキストのみで動作します。
あまり疑問に思いますか?
お問い合わせ

 

[rpor66]

アギールナコン
(setq 塩(sget "_w" p3 p4 (list (cons 0 "text")))))

 

[Mano63]

ありがとうございます。
今は美しい作品です!