UCS 与文字依附

hzj2000

来而时顶之，不亦乐乎。

oxm44

原帖由 hzj2000 于 2009-6-27 16:39 发表
三维布置图的管路上很多文字注释，看起来好象离管路很近，其实相距很远，
( n5 h( w9 K! v! a8 I2 ?你用三维动态旋转换个角度观察一下就知道了。
8 q4 p. r! S: {, O7 h/ s5 Q" o
9 e8 \# m' w3 n
$ b9 X( S# z2 ]1 X) X, J8 R  A如何能让文字根据在屏幕当前视图上看起来离哪根管路最近，就自动地真正附在管路之上 ...

2 ~7 ]1 }: }+ T! A/ g  p9 V注释文字看起来很近，其实相距很远，这是你在放置文字时要么基点没有选择好（基点本身取得很远），要么放置的位置点没有取好！只要你在注释文字前正确摆放了UCS，应该不会出现你说的这种情况的。
& i$ u9 l- I( {# A/ z5 [

oxm44

看了一下你的原图，问题出在放置文字的位置上，必须在捕捉设置中勾选最近点，放置文字时将文字移到所要附着对象的附近，捕捉到最近点后点击即可。
! ^! Y7 v) V+ [6 m! N! X: u  目前CAD还没有自动附着的功能。

hzj2000

自己再顶，

“实现如下功能:点一下文字,再点一下直线,文字就会移到所点的直线点的上方。”
' E$ _# j$ d7 k" Z# q+ f3 E
我自己想了想，这个实现起来好象用处不算大,自己移动文字再加对象捕捉应该就行了吧，好象没必要作LISP，
现在关键是将怎样使文字自动移到附近的管路上，因为文字实在太多了，有上百份图，这里的文字只是冰山一角，沧海一粟。

Tao5574909

利用轴测图,绘制管道的单线图比较好,表注和文字都可以按照你的意思来任意摆放!!

hzj2000

我顶 我顶 我顶顶顶

hzj2000

我顶 我顶 我顶顶顶

hzj2000

大家说的我都知道 这份图其实已经能交差了,反正打印出来文字在管路旁.
$ v" n% G1 |& q7 C5 p# X  ~
, h; }# K" B# A8 @问题是现在,要跟其它图合并,文字位置都已经这样了,要一个一个移的话,工程量太大.

hzj2000

只好自己一步一步来解决：

请问：
1、测量文字与各条管路的距离(按屏幕所见,不是真实的距离),相关的命令是什么

hzj2000

没人会
/ I' Z, [* S+ d% ~靠自己摸索也难啊，

我的思路
程序步骤如下：
0 \; a/ k$ B2 C
( j) a5 Z5 F$ d- X1、测量文字与各条管路的距离(按屏幕所见,不是真实的距离),这个有什么命令实现，或有什么变通的命令么。
- {8 x1 Q* b! y" H6 z
0 I# S1 k# m8 o' U: x. P5 X2、根据测量结果，将距离文字最短的管路与文字关联。

1 o2 @0 [! C0 f3、将文字自动移到关联管路上，
" O2 r4 Z4 }* G
5 S. r1 `' o7 \. y5 U% E  Q这个用VB或LISP怎么实现


% j* y2 [) \) ^5 R* V6 F6 o问题的关键是如何判断文字与直线的距离。
  c4 D% G7 D7 q9 v7 }

_________________

hzj2000

一而再，再而三，三而不竭顶。
& y. Y! ^3 ?# S我顶顶顶

偶00然

观看观看..............

hzj2000

继续啊,
* A2 L; r+ z$ o3 Y0 A$ Z顶帖尚未够多,同志仍需努力.