| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | PNY wird von NVIDIA zum Händler des Jahres gewählt - zum dritten Mal in Folge, eine Pressemitteilung
|
|
Autor
|
Thema: acad 2013 - LwPolyline (874 mal gelesen)
|
reltro
Mitglied
student
   Beiträge: 125
Registriert: 08.11.2009 Acad 2012 - VBA,Lisp
Revit 2012
3dsMax 2012
Rhino 5 - GH,Pyhton,rhino.Common<P>Win 7 - i7 4x3.2GHz - 8Gb DDR3
|
erstellt am: 20. Apr. 2012 13:25  <-- editieren / zitieren -->   Unities abgeben:          
Hallo liebe VBA-Menschen... Hab mir gerade acad2013 draf gespielt und versucht meine dvb-projekte zu laden; mit mäßigen erfolg... Kann es sein dass es plötzlich keine LwPolylines mehr gibt? Folgendes führt zum Fehler: "Invalid procedure call or argument" Code:
Sub main() Dim obj As AcadObject
Dim pkt(2) As Variant
pkt(0) = ThisDrawing.Utility.GetPoint
pkt(1) = ThisDrawing.Utility.GetPoint
pkt(2) = ThisDrawing.Utility.GetPoint
Dim inPL(5) As Variant
inPL(0) = pkt(0)(0)
inPL(1) = pkt(0)(1)
inPL(2) = pkt(1)(0)
inPL(3) = pkt(1)(1)
inPL(4) = pkt(2)(0)
inPL(5) = pkt(2)(1)
Set obj = ThisDrawing.ModelSpace.AddLightWeightPolyline(inPL) MsgBox obj.ObjectName End Sub
Lg reltro Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
reltro
Mitglied
student
Beiträge: 125
Registriert: 08.11.2009 Acad 2012 - VBA,Lisp
Revit 2012
3dsMax 2012
Rhino 5 - GH,Pyhton,rhino.Common<P>Win 7 - i7 4x3.2GHz - 8Gb DDR3
|
erstellt am: 20. Apr. 2012 13:29 <-- editieren / zitieren --> Unities abgeben:
|
| |
reltro
Mitglied
student
Beiträge: 125
Registriert: 08.11.2009 Acad 2012 - VBA,Lisp
Revit 2012
3dsMax 2012
Rhino 5 - GH,Pyhton,rhino.Common<P>Win 7 - i7 4x3.2GHz - 8Gb DDR3
|
erstellt am: 20. Apr. 2012 13:48 <-- editieren / zitieren --> Unities abgeben:
|
Foren auf CAD.de
| 
