怎样在检测单击在线段上。

[zhwx]

我编一个图像处理程序，不知怎样在检测用户Mouse单击在线段上。
圆、矩形，多边形都可用PtInRegion检测。线段该如何？
线宽会改变。

[zdg]

需要自己写函数, 方法:
1)计算点到线段的垂直距离(中学课本上有公式)
2)判断距离<线宽???

[Chen_Lin]

自己编吧，反正我是自己编程实现的。

[major2]

在form_click事件里自己编程检验鼠标位置离开线段的距离

[RiverHill]

我现在正在做这种程序，其实这种并不难。不过，我是用VC++做的。
只是你给的分太低了，现在，我把详细设计告诉你。
具体思路：
1、从CObject派生出一个CDraw类来，CDraw类中具有的特征：
class CDraw:public CObject //基本图形类，用来存储图形的颜色、线型、层等信息
{
protected:
CDraw(){} //构造函数
short m_ColorPen; //笔色
short m_ColorBrush; //填充刷颜色
short m_LineWide; //线宽（像素）
short m_LineType; //线型（像素）
short m_Layer; //所处层
BOOL b_Delete; //是否处于删除状态
// DECLARE_SERIAL(CDraw); //串形化
public:
CDraw(short ColorPen,short ColorBrush,short LineWide,
short LineType,short Layer,BOOL Delete)
//构造函数
{
m_ColorPen=ColorPen;
m_ColorBrush=ColorBrush;
m_LineWide=LineWide;
m_LineType=LineType;
m_Layer=Layer;
b_Delete=Delete;
}
//计算点到直线的距离的函数
float PointLine(float xx,float yy,float x1,float y1,float x2,float y2);
//判断点是否在一个多边形区域中的函数
BOOL PointRgn(float x,float y,int Numble,PointStruct *PointList,float blc);
BOOL IsDelete(); //判断一个图形元素是否删除的函数
float CalDisp(float x1,float y1,float x2,float y2);//计算两点间的距离的函数
void Delete(BOOL Is); //删除或恢复删除图形元素的函数
//从一个文件中存储或读出图形坐标数据的函数
virtual void Save(CFile* file,BOOL Yn);
virtual void Serialize(CArchive& ar); //文档串形化函数
void toChar(char *p_Char);
char *toData(char *p_Char);
virtual void Draw(CDC *pDC,int m_DrawMode,int m_DrawMode1,short BackColor)=0;
}
;
2、从CDraw类中派出生直线类
class CLine:public CDraw //直线类
{
protected:
float m_X1,m_X2,m_Y1,m_Y2; //直线的起点和终点
DECLARE_SERIAL(CLine); //声明串形化

public:
CLine(){} //不带任何参数的构造函数
//以下是有初始化参数的构造函数
CLine(short ColorPen,short ColorBrush,
short LineWide,short LineType,short Layer,
BOOL Delete,float X1,float Y1,float X2,float Y2)
:CDraw(ColorPen,ColorBrush,LineWide,LineType,Layer,Delete)
{
m_X1=X1;
m_Y1=Y1;
m_X2=X2;
m_Y2=Y2;
}
//直线的绘制函数
virtual void Draw(CDC *pDC,int m_DrawMode,int m_DrawMode1,short BackColor);
//得到边界矩形的函数
void GetRect(float *minX,float *minY,float *maxX,float *maxY);
BOOL IsPoint(float x,float y,float jl); //判断是否被点选中的函数
virtual void Serialize(CArchive& ar); //串形化函数
//从剪裁板中读出或写入剪裁板的函数
void Save(CFile* file,BOOL Yn);
void toChar(char *p_Char);
char *toData(char *p_Char);
void Move(float x_Move,float y_Move);
};

3、从CDraw类中派生出连续直线或区域类
class CPline:public CDraw //连续直线或多边形区域类
{
protected:
int m_Numble; //连续直线或多边形区域的顶点数
BOOL b_Fill; //是否为连续直线
PointStruct* m_PointList; //存储顶点的数组指针
DECLARE_SERIAL(CPline); //声明串形化
;
public:
CPline() //不带任何参数的构造函数
{ m_Numble=0;}
CPline(short ColorPen,short ColorBrush,
short LineWide,short LineType,short Layer,
BOOL Delete,int Numble,PointStruct* PointList,BOOL Fill)
:CDraw(ColorPen,ColorBrush,LineWide,LineType,Layer,Delete)
{
m_Numble=Numble;
b_Fill=Fill;
m_PointList=new PointStruct[Numble]; //分配空间
if(Numble>0)
{
for(int i=0;i<Numble;i++)
m_PointList[i]=PointList[i];
}
}
~CPline() //析够函数
{
if(m_Numble>0)
delete m_PointList;
}
virtual void Draw(CDC *pDC,int m_DrawMode,int m_DrawMode1,short BackColor);
void GetRect(float *minX,float *minY,float *maxX,float *maxY);
BOOL IsPoint(float x,float y,float jl,float blc);
BOOL IsPLine();
void Save(CFile* file,BOOL Yn);
virtual void Serialize(CArchive& ar);
void toChar(char *p_Char);
char *toData(char *p_Char);
int GetNumb();
void Move(float x_Move,float y_Move);
};

//接着派生出
class CCircle:public CDraw //圆及圆形区域类
{
protected:
float m_CircleX,m_CircleY,m_CircleR; //圆心及半径
BOOL b_Fill; //是否填充 1-圆形区域 0-普通圆
DECLARE_SERIAL(CCircle);
public:
CCircle() //不带任何参数的构造函数
{}
CCircle(short ColorPen,short ColorBrush,
short LineWide,short LineType,short Layer,
BOOL Delete,float CircleX,float CircleY,float CircleR,BOOL Fill)
:CDraw(ColorPen,ColorBrush,LineWide,LineType,Layer,Delete)
{
m_CircleX=CircleX;
m_CircleY=CircleY;
m_CircleR=CircleR;
b_Fill=Fill;
}
virtual void Draw(CDC *pDC,int m_DrawMode,int m_DrawMode1,short BackColor);
void GetRect(float *minX,float *minY,float *maxX,float *maxY);
virtual IsPoint(float x,float y,float jl);
BOOL IsCircle();
virtual void Save(CFile* file,BOOL Yn);
virtual void Serialize(CArchive& ar);
void toChar(char *p_Char);
char *toData(char *p_Char);
void Move(float x_Move,float y_Move);
};

class CArc:public CCircle //圆弧类
{
protected:
float m_Angle1,m_Angle2; //圆弧的起点和终点角度
DECLARE_SERIAL(CArc);
public:
CArc() //不带任何参数的构造函数
{}
CArc(short ColorPen,short ColorBrush,short LineWide
,short LineType,short Layer,BOOL Delete,float CircleX
,float CircleY,float CircleR,BOOL Fill,float Angle1,float Angle2)
:CCircle(ColorPen,ColorBrush,LineWide,LineType,Layer,Delete,CircleX,
CircleY,CircleR,Fill)
{
m_Angle1=Angle1;
m_Angle2=Angle2;
}
virtual void Draw(CDC *pDC,int m_DrawMode,int m_DrawMode1,short BackColor);
void Init(short ColorPen,short ColorBrush,short LineWide,short LineType,short Layer,BOOL Delete,float CircleX,float CircleY,float CircleR,BOOL Fill,float Angle1,float Angle2);
void GetRect(float *minX,float *minY,float *maxX,float *maxY);
virtual BOOL IsPoint(float x,float y,float jl);
void Save(CFile* file,BOOL Yn);
virtual void Serialize(CArchive& ar);
void toChar(char *p_Char);
char *toData(char *p_Char);
};

class CText:public CDraw //标注文本类
{
protected:
float m_StartX; //文本起点横坐标
float m_StartY; //起点纵坐标
float m_Angle1; //标注角度
float m_Angle2; //字体旋转角度
float m_TextHeight; //字体高度
float m_TextWide; //字体宽度
float m_OffWide; //间隔宽度
unsigned char m_TextFont; //字体
CString c_Text; //标注的文本信息
int m_TextLong; //标注信息的长度
DECLARE_SERIAL(CText);
public:
CText() //不带任何参数的构造函数
{}
CText(short ColorPen,short ColorBrush,short LineWide
,short LineType,short Layer,BOOL Delete,float StartX,
float StartY,float Angle1,float Angle2,float TextHeight,float TextWide,
float OffWide,unsigned char TextFont,CString Text)
:CDraw(ColorPen,ColorBrush,LineWide,LineType,Layer,Delete)
{
m_StartX=StartX;
m_StartY=StartY;
m_Angle1=Angle1;
m_Angle2=Angle2;
m_TextHeight=TextHeight;
m_TextWide=TextWide;
m_OffWide=OffWide;
m_TextLong=Text.GetLength(); //计算字符的长度
c_Text=Text;
}
virtual void Draw(CDC *pDC,int m_DrawMode,int m_DrawMode1,short BackColor);
void Init(short ColorPen,short ColorBrush,short LineWide,short LineType,short Layer,float StartX,float StartY,float Angle1,float Angle2,float TextHeight,float TextWide,float OffWide,unsigned char TextFont,CString Text);
void GetRect(float *minX,float *minY,float *maxX,float *maxY);
BOOL IsPoint(float x,float y,float jl,float blc);
void Save(CFile* file,BOOL Yn);
virtual void Serialize(CArchive& ar);
void toChar(char *p_Char);
char *toData(char *p_Char);
int GetLong();
void Move(float x_Move,float y_Move);
};


2、实现类函数:
BOOL IsRectCross(float minx,float miny,float maxx,float maxy);

//检查矩形是否与屏幕矩形相交
BOOL IsRectCross(float minx,float miny,float maxx,float maxy)
{
if(minx>xMaxScreen and and maxx<xMinScreen and and miny>yMaxScreen and and maxy<yMinScreen) //两个矩形区域不相交
return 0; //如不相交函数返回0
else
return 1; //如果相交就返回1
}

//将实际坐标转换为逻辑坐标
void DPtoVP(float x,float y,int *X,int *Y)
{
p_View->DPtoVP(x,y,X,Y);
}

//将逻辑坐标转换为实际坐标
void VPtoDP(int x,int y,float *X,float *Y)
{
p_View->VPtoDP(x,y,X,Y);
}

//将实际距离转换成逻辑距离
int DLtoVL(float l)
{
return p_View->DLtoVL(l);
}

//将逻辑距离转变成实际距离
float VLtoDL(int l)
{
return p_View->VLtoDL(l);
}

第二、接下来：
需要在CDoc类中利用CTypeArrayPtr类将管理对象全部读入内存，

1、利用当前鼠标点坐标从设备坐标转换成逻辑坐标，在当前内存中的各种对象进行比较，比较函数我已经在上面写明了。

若你不好理解，可以给我发Email至[e-mail]

另外，如果你有兴趣可参阅陈建春博士所著《Visual C++ 高级编程技术》一书 《电子工业出版社》出版。

[zhwx]

我不懂C，看不大懂，我觉得
这样太烦了。再说如果线宽不一样时怎么办？

我有想法：

BeginPath hdc
MovetoEx hdc,x,y
Lineto hdc,x2,y2
EndPath
r=PathToRegion(hdc)

路径转化务区域，再用PtInRegion，这样就非常简单了。对
任意复杂的折线,贝赛尔线也能检测到。

但我PathToRegion(hdc)虽然返回r<>0,
但还是无法检测到。
书上说路径中用的绘图函数全部用逻辑坐标，但我试过
，好象没起作用。问题可能也就出在这里。

[RiverHill]

顺便问一句，你做这些东东是做什么用的。是做绘图程序，还是做GIS，还是自己抽空学习一下？

[RiverHill]

顺便问一句，你做这些东东是做会么用的。是做绘图程序，还是做GIS，还是自己抽空学习一下？

[RiverHill]

其实，不管用什么语言实现，其基本思想是一样。
如果做绘图程序的话，你得自己操作失量图形数据。在检测范围时加上线段的宽度，就可以了。

举例：
1、线段有两个顶点，其坐标为point1(0, 0); point2(50, 100);
2、那么当前鼠标点的坐标（须经设置到逻辑转换）为pointX(x, y);
3、现在就可以求鼠标点坐标到线段间距离，检测是再加上线段的宽度。
就可以判断出来了。

我现在在做GIS，全部都是失量.

[RiverHill]

你在图上画的线段,包括所有的其它图形,都必须有它自己的数据结构,不是随便拿几个变量颧常量数据,在屏幕上画一下就可以的.
例如,做GIS,就须要有几十类来管理各种图形的数据结构.

现成提供几个函数.以供检测范围.
//计算点(x1,y1)与点(x2,y2)间的距离
float CDraw::CalDisp(long x1, long y1, long x2, long y2)
{
return (float)sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
}

//作用：计算点（xx,yy)到线段（x1,y1)(x2,y2)的距离，返回计算的距离值

//函数PointRgn作用：判断一个点是否在任意多边形区域内
//参数：Numble-边界点数，x,y是点的坐标，多边形顶点的坐标在结构数组PointList中
//返回：1-点在多边形区域0-不在
float CDraw::PointLine(long xx, long yy, long x1, long y1, long x2, long y2)
{
float a, b, c, ang1, ang2, ang;
//计算三条边的距离
a=CalDisp(x1, y1, xx, yy); if(a == 0.0) return 0.0;
b=CalDisp(x2, y2, xx, yy); if(b == 0.0) return 0.0;
c=CalDisp(x1, y1, x2, y2);

//如果（x1,y1)和(x2,y2)是一个点直接返回距离
if(c==0.0) return a;
if(a<b) //如果(xx,yy)的点(x1,y1）这条边较短
{
if(y1==y2)
{
if(x1<x2)
ang1=0;
else
ang1=(float)pi;
}
else
{
ang1=(float)acos((x2-x1)/c);
if(y1>y2)ang1=(float)pi*2-ang1; //直线(x1,y1)-(x2,y2)的弧度
}
ang2=(float)acos((xx-x1)/a);
if(y1>yy)ang2=(float)pi*2-ang2; //直线(x1,y1)-(xx,yy)的弧度
ang=ang2-ang1;
if(ang<0)ang=-ang;
if(ang>pi) ang=(float)pi*2-ang; //交角的大小
if(ang>pi/2) return a; //如果为钝角，直接返回距离
else
return (a*(float)sin(ang)); //否则返回计算得到的距离
}
else //如果(xx,yy)的点(x2,y2）这条边较短
{
if(y1==y2)
{
if(x1<x2)
ang1=(float)pi;
else
ang1=0;
}
else
{
ang1=(float)acos((x1-x2)/c); //直线（x2,y2)-(x1,y1)的斜率的弧度
if(y2>y1)ang1=(float)pi*2-ang1;
}
ang2=(float)acos((xx-x2)/b); //直线（x2,x1）-(xx,yy)的斜率的弧度
if(y2>yy)ang2=(float)pi*2-ang2;
ang=ang2-ang1;
if(ang<0) ang=-ang;
if(ang>pi) ang=(float)pi*2-ang; //交角的大小 ?
if(ang>pi/2) return b; //如果为钝角，直接返回距离
else
return(b*(float)sin(ang)); //否则返回计算得到的距离
}
}

[zhwx]

这样虽然可以，检测到，但不是很精确，当要用Mouse拖动
这个对象时，效果不是很好。圆、矩形就可以得到精确的区域
对象，从而可以很平滑地移动。
当绘图区对象很多时，计算量大。
如果是曲线，计算量就更大了。这样移动对象速度就很慢。
而VB不是很合适做浮点运算。所以我认为
如果能应用到Path就省事多了，可惜这方面资料很少。

我是做夭量绘图程序，绘图区可能会有很多的对象。

[RiverHill]

我在今天下午晚些时候，询问一些这方面的专家，你说的话有道理，我表示赞同。
关于用DC的path，我目前还未用到，相信过一段时间，随着工程进展，你提到的那些问题，我都得接触到。目前，我的GIS工程还正在缓步前进...

[RiverHill]

由于GIS的信息海量，关于判断点是否在某个对象内，我们做程序时只能让CPU始终一直不停的Doing this Test，在我们的做法大致是这样的：
失量化的关键数据且比较小的全部读入内存，其他稍微较大的放在数据库中，当前屏幕逻辑坐标范围始终能计算出来，在相关的数据中皆有与屏幕对应的键值，这句话的意思说白了，将失量化图形划分为十几个区或几十个区，简化搜索范围。这样能提高效率！

[Un1]

给你一个程序片段研究研究：

Private Function IsNotInEither(typObject As typDraw, X As Single, Y As Single) As Boolean
Dim sngA As Single, sngB As Single, Ratio As Single, Ratio1 As Single
Dim sngX1 As Single, sngY1 As Single, sngX2 As Single, sngY2 As Single
Dim lngR As Single
Dim blnIsNotInEither As Boolean

With typObject
sngX1 = .X1 * sngMulripleEnlarge
sngY1 = .Y1 * sngMulripleEnlarge
Select Case .Shape
Case conTLine '当对象为线时
sngX2 = .X2 * sngMulripleEnlarge
sngY2 = .Y2 * sngMulripleEnlarge
If sngX2 = sngX1 Then '判断是否为垂直线
Ratio = .BorderWidth * conBorder * sngMulripleEnlarge + conLineWidth
If (Y >= sngY1 - Ratio And Y <= sngY2 + Ratio And X > sngX1 - Ratio And X < sngX1 + Ratio) Or _
(Y >= sngY2 - Ratio And Y <= sngY1 + Ratio And X > sngX1 - Ratio And X < sngX1 + Ratio) Then blnIsNotInEither = True
Else
sngA = (sngY1 - sngY2) / (sngX1 - sngX2)
sngB = sngY1 - sngA * sngX1
Ratio1 = Y - sngA * X
Ratio = .BorderWidth * conBorder * sngMulripleEnlarge + conLineWidth
Ratio = Ratio * Sqr(1 + sngA * sngA)
If Ratio1 < sngB + Ratio And Ratio1 > sngB - Ratio Then
Ratio = .BorderWidth * conBorder + conLineWidth
If ((Y >= sngY1 - Ratio And Y <= sngY2 + Ratio) Or (Y >= sngY2 - Ratio And Y <= sngY1 + Ratio)) _
And ((X > sngX1 - Ratio And X < sngX2 + Ratio) Or (X > sngX2 - Ratio And X < sngX1 + Ratio)) Then blnIsNotInEither = True
End If
End If
Case conTRectangle '当对象为矩形时