Public Function GetRegistryPoint( _
   ByVal lpszSection As String, _
   ByVal lpszEntry As String, _
   ByVal dX As Double, _
   ByVal dY As Double, _
   ByVal dZ As Double _
) As PointData