The author of that crap was fully aware of the fact
that there were problems with the VL ActiveX interface,
as have been discussed here many times, but chose to
downplay if not conceal that, for whatever reason.
You're just one of the victims.
One of the problems with AutoCAD and Autodesk, is
that every single one of its high-level end-user APIs
is grossly incomplete, forcing customers to resort to
unreasonable hacks like this one.
There are some who believe that this was deliberate
because of the idea that while Autodesk likes to make
marketing points with the idea that you can program
its software, allowing customers to solve problems that
way is not in their financial interests, because it makes
it harder for them to sell the solution in the form of a
feature in a future release of the product.
--
http://www.caddzone.com
AcadXTabs: MDI Document Tabs for AutoCAD 2004/2005/2006/2007
http://www.acadxtabs.com
wrote in message news:5311489@discussion.autodesk.com...
hello all, if you havent read my previous post im using vlax to find perpendicular points. The function i was helped to write is as such
Public Function fncPerpendicularTo(oEnt As AcadEntity, dPoint As Variant) As Variant
Dim perpPoint As Variant
Dim obj As Curve
Set obj = New Curve
Set obj.Entity = oEnt
perpPoint = obj.GetClosestPointTo(dPoint, True) ---error here
fncPerpendicularTo = perpPoint
End Function
The function works very well but when i call it from an iteration which loops more than about 30 or 40 times it will error out with a Runtime error '2000' where i marked in the code. If i keep the amount of iterations very small it works fine. Any idea what is going on and how i can solve this problem?
