|
AutoCAD VBA : Objekte von einer Lage lesen
Stelli1 am 27.11.2012 um 19:09 Uhr (0)
Hallo,im angegebenen Link ist ein Kurzbeispiel mit einer kleinen Falle drin.Macht man mal um kurz was zu probieren.Ich habe dir das mal (ohne zu Testen) zusammenkopiert und auskommentiert.So sollte es gehen Code: Deine Funktion zur SelektionPublic Sub mySelect() Selectionset (hierin sollen deine ausgewählten Objeklte aufgelistet werden) Dim tSSet As AcadSelectionSet Arrays für Filterangeben anlegen Dim FType(0) as Integer Dim FData(0) as Variant Fehlerverfolgung an da man ein Selektionset nur einmal ha ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : SelectionSet Fehlermeldung Programmabbruch
startrek am 07.12.2011 um 22:50 Uhr (0)
Zitat:Original erstellt von ela-cad:Der Hinweis auf den Errorhandler hat mir gezeigt, das der Fehler in dieser Schleife liegt:Code:For Each objSset In ThisDrawing.SelectionSets If objSset.Name = "NeuerAuswahlsatz" Then objSset.Delete End IfNextOhne jetzt Deinen geänderten Code zu kennen ... der Fehler liegt (ungetestet) garantiert NICHT! in dieser Abfrage;-)Der Fehler liegt IMHO dabei, wo und wie Du mit On Error resume next und mit On Error goto 0 umgehst.Den Errorhandler brauchste schon bei Deine ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Dirk.B am 22.08.2007 um 10:34 Uhr (0)
Hallo Carsten!Hallo Forum! Zitat:nodetag.Pfad = GetIniString("Leuchten", "Halogen", "", "C:Blockverwaltung.ini", 32767)Hiermit komme ich nicht klar.Ich habe ja einmal meinen INIEditor und einmal mein TreeView_Test.In dem TreeView_Test habe ich bzw. Wilfried ja die Nodes manuel erstellt und die Pfadzuweisung erfolgt ja über die Registry.Wenn ich Wilfried ja richtig verstanden habe, Zitat:Als nächsten Schritt würde ich an deiner Stelle das Befüllen des Treeviews ändern. Du arbeitest jedes Node für sich ab. B ...
| | In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Layout wechseln
BloodyMess am 10.09.2004 um 09:54 Uhr (0)
Hallo, @Nancy, bin froh, das Du den Anfang gemacht hast ... @Dan mir ging es ebenso wie Nancy. Auch ich wußte nix so recht mit deinem Code anzufangen. Ich lerne je gerne noch dazu, aber bei deinem Code ist einiges, was noch verbesserungswürdig ist. Es spricht auch nix dagegen, wenn man von Anderen den Code in sein Projekt mit einbindet, mach ich auch (FileDialoge, Drucker ermitteln, usw.). Man kann nicht alles wissen. Der Teil ist in Ordnung, aber bei deinem Code bleiben mir manche Sachen verborgen. ...
| | In das Form Autocad VBA wechseln |
|
AutoCAD VBA : automatisch Polygon aus einzelnen Linien erstellen
rexxitall am 07.12.2018 um 09:58 Uhr (1)
HI, Anstelle mit dem Phytagoras zu hantieren kann man z.B. festlegen das die Endpunkte auf einem 5 mm Raster liegen (Ich komm vom Bau ) das ist durch Runden oder Nachkommastellen entfernen schneller als der Phytagoras. Nun kann man diese Zahlen als String abspeichern und mit einfachem String vergleich nachsehen ob die Werte identisch sind. Diese Strings kann man auch in einem Dictionary als Schlüssel verwenden. Zum Beispiel ein Dictionary welches die Endpunkte der (Poly)Linien als Schlüssel hat und als We ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Stelli1 am 20.02.2008 um 17:29 Uhr (0)
Hallo Ines,ich glaube in deinem Code ist etwas vermischt.In VB/VBA hast du die Möglichkeit auf die ActiveX Schnittstelle anderer Anwendungen zuzugreifen. Die Schnittstelle stellt Eigenschaften, Methoden, Funktionen und Events zu Verfügung.In VB erzeugst du mit Code:Set acApp = CreateObject("Autocad.Application")eine neue Instanz der Aktuellen AutoCAD Version. Hast du mehrere Versionen auf einem Rechner kann der "Klassenname" eventuell den Zusatz der Version besitzen (z.B. Autocad.Application.16 bei AutoCAD ...
| | In das Form AutoCAD VBA wechseln |
|
Autocad VBA : setXData
mapcar am 28.07.2005 um 12:52 Uhr (0)
Hi Nancy! Ich will noch mal versuchen, dir (und jedem, den s interessiert), das mit dem Appname zu erklären: Jede Applikation, auch deine, sollte *einen* eindeutigen Namen haben. Das hat folgende Vorteile: 1. Man kann Entities danach filtern (z.B. mit Befehlen oder ssget in Lisp) 2. Man bringt nicht die AutoCAD-EEDs mit den eigenen durcheinander 3. Man bringt nicht die eigenen Daten mit denen einer anderen Applikation durcheinander Mit einer Zeile wie oTxt.GetXData "", xType, xDat tust du aber genau das ...
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
