3D点的平面投影公式及程序

 

 

物体点P相对于V在Screen上的投影,因为是作为上计算机使用的,所以采用了计算机上的坐标系来推算(理论上在其他直角坐标系也通用)

其中计算公式:

经过验算没有错误,其中得到的值P'的点是一个相对的值,可以通过变换坐标系原点到屏幕中心来实现.

详细见程序

 

 

 

程序实例中的示例图形是如下的一个空间中的长方形.

 

如下是程序Test中录制的动态截图(从SkyDrive上传的,外链不知会保持多久.源地址:http://cid-8c110fdb0570c79a.skydrive.live.com/self.aspx/WMV%e5%a4%96%e9%93%be/%e6%b5%8b%e8%af%95%e8%bf%90%e8%a1%8c.wmv):

唯一一点可能就是这个是用VS2010写的,有些代码可能不兼容,不过大体上没有关系,我说利用到的不过只是快捷设置属性这一点,以及.NetFramework 4 版本的System.Drawing名称空间

总体来说感觉不是很理想,没有达到最期待的效果,如下给出下载地址(包括主类和Test窗体),欢迎给予改进,最好在改进后再回复我一下,可以让我也学习学习.非常期待.谢谢

下载: Projection3D.rar

91KB

0

2010/5/15 16:06:16

下面是全部代码(Projection3D.vb ClassLibrary)

 

Imports System.Drawing
Namespace Projection3D
    Public Class Point3D
        Property X As Long
        Property Y As Long
        Property Z As Long
        Sub New(ByVal X As Long, ByVal Y As Long, ByVal Z As Long)
            MyClass.X = X
            MyClass.Y = Y
            MyClass.Z = Z
        End Sub
    End Class
    Public Class Projection3D
        Property ViewPoint As Point3D
        Property ObjPoint As Point3D
        Private Projection As Point
        ReadOnly Property ProjectionPoint As Point
            Get
                Return ProjectionPoint
            End Get
        End Property
        Sub New(ByVal Vp As Point3D, ByVal Op As Point3D)
            ViewPoint = Vp
            ObjPoint = Op
            GetProjection()
        End Sub
        Public Function GetProjection() As Point
            If UnError() = 0 Then
                Projection.X = (ViewPoint.Z * ObjPoint.X - ViewPoint.Z * ViewPoint.X) / (ViewPoint.Z - ObjPoint.Z)
                Projection.Y = (ViewPoint.Z * ObjPoint.Y - ViewPoint.Z * ViewPoint.Y) / (ViewPoint.Z - ObjPoint.Z)
                Return Projection
            Else
                Return New Point(0, 0)
            End If

        End Function
        Public Function UnError() As Integer
            If ViewPoint.Z - ObjPoint.Z = 0 Then
                Return 1
            Else
                Return 0
            End If
        End Function
    End Class
End Namespace