求教,,, 距离问题.

dwt2601

<BR>求教,,, 距离问题.


哪位知道怎么样才能求出两条线之间的距离,,,<BR>(有可能两条线不是一样长,,, 基本是平行的......)


最好有代码,,谢谢谢谢....

dwt2601

hehe hehe

meflying

基本是平行?如果不是绝对平行,"两条线之间的距离"不知道是什么距离

jdhszh

不平行就相交，晕

blue_wind

是不是空间两条不相交直线距离？

dwt2601

不好意思,刚才没说清楚,,,两条线不是完全平行,,, 但在图上也不会相交,,,, 两条线的距离不是要的很精确,这个差不多就行.. 我只要个程序能大概算出这两条线的距离(不能说是距离,,反正就是这个意思了..)
我给幅图,大家看看....
就是一般的街区线,,, 我是做测绘的.....

紫云飞

搂主的问题也正是困扰我的问题，只是他算的是街道，而我要算的是墙体间的距离。


大家帮帮忙，提供个思路也好啊！！

cqnj023

实在不明白，图上也没有你要的结果哇，怎么明白你的“距离”是什么东西也

yshf

;请试用以下程序:
(defun c:test()
(setq xtblm '("cmdecho" "osmode")
xtblz (mapcar 'getvar xtblm)
)
(mapcar 'setvar xtblm '(0 512))
(command "undo" "be")
(while (setq p1 (getpoint "\nLine 1:"))
(command "_dimaligned" p1
(setq p2 (osnap (getpoint p1 "\nLine 2:") "perp"))
"t" (rtos (distance p1 p2) 2 3)
p1
)
)
(command "undo" "e")
(mapcar 'setvar xtblm xtblz)(princ)
)