CheckProjectionByDirection

From scripting
Revision as of 05:13, 22 April 2017 by Nickpisca (talk | contribs) (Created page with " Function CheckProjectionByDirection(PointObj As Variant, LineObj As Variant, TargetObj As Variant) As Boolean On Error GoTo Blast Dim Pr As HybridShapeProject Set Pr = MyH...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search 
Function CheckProjectionByDirection(PointObj As Variant, LineObj As Variant, TargetObj As Variant) As Boolean
On Error GoTo Blast
Dim Pr As HybridShapeProject
Set Pr = MyHSFactory.AddNewProject(PointObj, TargetObj)
Pr.Direction = MyHSFactory.AddNewDirection(LineObj)
CheckProjectionByDirection = True
Exit Function
Blast:
CheckProjectionByDirection = False
End Function
Retrieved from "http://nickpisca.com/BLAST/index.php?title=CheckProjectionByDirection&oldid=55"