|
Autocad VBA : getpoint Fehler
rhoehnke am 27.06.2006 um 15:53 Uhr (0)
Hallo,wir haben eine Software geschrieben, für AutoCAD 2000 und AutoCAD VBA. Jetzt haben wir auf AutoCAD 2007 upgedatet und bekommen eine Fehlermeldung. Bei Aufruf unserer Software erscheint auf dem Bildschirm eine VBA Formular mit einem Button "draw". Wenn der Benutzer auf "draw" klickt, wird in VBA die Funktion getpoint aufgerufen. Wenn der Benutzer dann mit der Maus auf die Zeichnung klickt, kommt folgende Fehlermeldung:Laufzeitfehler -2147352567 (80020009):Die Methode GetPoint für das Objekt IAcadUtili ...
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : getpoint Fehler
rhoehnke am 29.06.2006 um 08:43 Uhr (0)
Hallo, danke für die antwort. Hier der Code:Option ExplicitPublic pntPick As VariantPrivate Sub cmdDraw_Click() *** Code *** Dim brfBlock As AutoCAD.AcadBlockReference Dim objLayer As AcadLayer For Each objLayer In ThisDrawing.Layers If objLayer.Freeze Then objLayer.Freeze = False End If Next pntPick = ThisDrawing.Utility.GetPoint(, "Pick Point ") ThisDrawing.ActiveLayer = ThisDrawing.Layers("Rahmen") Set brfBlock = ThisDrawing.ModelSpace.InsertBlock(pntPick, dwgSTRSERVER & "vewPickPoi ...
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |