版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
教程VB.net版本请访问: EmguCV学习笔记 VB.Net 目录-CSDN博客
教程C#版本请访问: EmguCV学习笔记 C# 目录-CSDN博客
笔者的博客网址:https://blog.csdn.net/uruseibest
教程配套文件及相关说明以及如何获得pdf教程和代码(博客上的教程内容会和pdf教程一致,教程中也会包含所有代码),请移步:************************************************************EmguCV学习笔记****************************************************************
3.6 旋转矩形
RotatedRect结构表示一个旋转矩形,它由中心坐标、大小(长轴长度和短轴长度)和旋转角度三个属性组成。
以下是RotatedRect结构的定义:
Public Structure RotatedRect
Public Center As PointF
Public Size As SizeF
Public Angle As Single
End Structure
其中,各属性的含义如下:
- Center:旋转矩形的中心坐标,PointF类型。
- Size:旋转矩形的长轴长度和短轴长度,SizeF类型。
- Angle:旋转矩形的旋转角度,单位为度,Single类型。
RotatedRect结构还提供了一些方法,如GetVertices、GetBoundingRect等,可以方便地获取旋转矩形的顶点坐标、外接矩形等信息。
如果要绘制出旋转矩形,比较遗憾的是Cvinvoke没有提供直接的方法,但是可以通过RotatedRect的GetVertices先获得顶点坐标,再通过Polylines和FillPoly来绘制和填充。
【代码位置:frmChapter3】Button6_Click、PointFToPoint
'旋转矩形
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
Dim mcs1 As New MCvScalar(0, 0, 255)
Dim mcs2 As New MCvScalar(0, 255, 0)
'旋转20度的旋转矩形
Dim rrec As New RotatedRect(New PointF(100, 200), New SizeF(80, 100), 20)
'获得4个顶点坐标
Dim pf() As PointF = rrec.GetVertices
'将PointF()转Point()
Dim p() As Point = Array.ConvertAll(pf, New Converter(Of PointF, Point)(AddressOf PointFToPoint))
'将Point()元素推入VectorOfPoint
Dim vp As New VectorOfPoint
vp.Push(p)
'绘制旋转矩形
CvInvoke.Polylines(mBg, vp, True, mcs1, 3)
'填充旋转矩形
CvInvoke.FillPoly(mBg, vp, mcs2)
ImageBox1.Image = mBg
End Sub
'将PointF转Point方法
Public Shared Function PointFToPoint(ByVal pf As PointF) As Point
Return New Point(CInt(pf.X), CInt(pf.Y))
End Function
运行后如下图所示:
图3-6 绘制、填充旋转矩形
大多数时候,我们获得的是PointF,也就是浮点坐标的Point。当遇到PointF需要转为Point的时候,可以使用以下代码:
Public Shared Function PointFToPoint(ByVal pf As PointF) As Point
Return New Point(CInt(pf.X), CInt(pf.Y))
End Function
如果是PointF数组转为Point数组,可以使用以下代码:
Dim p() As Point = Array.ConvertAll(pf, New Converter(Of PointF, Point)(AddressOf PointFToPoint))
这里使用了Array类的ConvertAll方法。