|
AutoCAD VBA : Alle AcadCircle und Polygone durchlaufen
pistolpete1 am 08.08.2007 um 22:17 Uhr (0)
Hallo!Ich habe gerade erst mit VBA in AutoCAD angefangen und stehe vor folgendem Problem:Ich habe einen Kanalplan der mehrere rote "Achtecke" und Kreise beinhaltet, in denen jeweils eine Nummer steht. Ich muss nun mittels VBA die Position des Achtecks bzw. Kreises mit der niedrigsten Nummer ermitteln. Ich habe schon versucht alle AcadCircles in ThisDrawing zu Durchlaufen aber bekomme laufend Fehler. Ich weiß leider auch nicht in welchem Layer die Objekte sind (Bitte um Verständnis, bin eh schon eifrig am L ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Alle AcadCircle und Polygone durchlaufen
Stelli1 am 09.08.2007 um 17:05 Uhr (0)
Hallo Peter,wenn ihr die Zeichnungen erzeugt habt ihr doch alles im Griff.Die ISYBAU Datei ist das Ergebnis der Kanaluntersuchung.In den ISYBAU Dateien stehen die Schäden/Beobachtungen mit Station drin dir ihr in die Zeichung bebracht habt. Schau doch mal nach ISYBAU Typ H.Code:Beispiel Isybau Typ H:H 0196 11.12.2000H HI 205406235 Mehrer Straße HI 305406235 05406235 05406230 012001200B K O 44.30 12 HI 405406235 0.00 0 ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Carsten1210 am 13.05.2007 um 19:12 Uhr (0)
Hi Dirk,Speicher den Pfad doch in der Registry bzw. in einer .ini-Datei. Das kannst dann ja nach belieben ändern.Wenn du das Child-Node nicht sichtbar haben willst kannst du doch einfach die Eigenschaft expanded von true auf false setzen und nur das Parent-Node wird dir angezeigt.Weiter Infos zum Treeview-Steuerelement findest du z.B. hier.Edit: Kleiner Nachtrag:Wenn du das Child-Node an ein bestimmtes Parent-Node anhängen willst, musst du dich durch die Nodes des Treeview-Elements bis zu dem bestimmten No ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Stelli1 am 28.05.2007 um 17:41 Uhr (0)
Hallo Dirk,hab mal ein wenig was in der DVB geändert.Du sollest überlegen oder mal schreiben wie der Benutzer denn den Pfad angeben soll.In der DVB habe ich mal eine Variante in der der Pfad in eine Textbox geschrieben wird und da geändert wird.Eine andere Variante ist über einen Wechselschalter die Pfade im Treeview ein- und auszublenden. (Diese Variante ist nur im Ansatz vorhanden).Die "Verwaltung" der Regpfade habe ich auch geändert um so unterschiedliche Schreibvarianten zu vermeiden.Da von abgesehen f ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Dirk.B am 12.08.2007 um 14:04 Uhr (0)
Hallo Wilfried!Hallo Carsten!Leider war ich die letzten 2 Monate bzgl. VBA zu nichts gekommen, da diese Zeit recht chaotisch war.Ab morgen bin dann erst einmal 1 Wochen im Urlaub.Gestern Abend hatte ich mal Zeit, mich um das TreeView zu kümmern.Wilfried, Dein Programm ist das was ich meinte bzw. erreichen wollte.Zu der INI Datei habe ich bzgl. schreiben und bearbeiten unter vb@rchiv folgendes gefunden: http://www.vbarchiv.net/workshop/workshop17.php Den Source Code habe ich mal versucht in VBA umzusetzen.D ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Carsten1210 am 12.08.2007 um 16:33 Uhr (0)
Hi Dirk,Hier mal ein Beispiel, wie du an die Support-Pfade kommst: Code:Sub GetSupportPath()Dim mySupportPath As StringmySupportPath = ThisDrawing.Application.preferences.Files.SupportPathMsgBox mySupportPathDim myplotpath As Stringmyplotpath = ThisDrawing.Application.preferences.Files.PrinterConfigPathMsgBox myplotpathEnd SubDu Solltest dann aber auch ein Abgleich machen, welches Profil gerade aktuell ist, nicht das du Werte im falschen Profil schreibst / änderst.Gruß, CarstenEdit:Du hast doch schon die F ...
|
| 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 : Probleme mit SelStart
Einstein am 13.08.2007 um 23:03 Uhr (0)
Hallo Carsten1210,ich hab mal das komplette Tool hochgeladen. Du musst es aber installieren damit du zu der besagten UserForm gelangst. (in der Datei "Installation.txt" findest du die Installationsanleitung)Da kannst du mir gleich ein Feedback zu dem, fast fertig gestellten, Tool geben, Ok!?------------------MfG A. Einstein P.S. Rechtschreibefehler sind gewollt und dienen der allgemeinen Belustigung!
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Handle eines eingefügten blockes
wronzky am 16.08.2007 um 15:20 Uhr (0)
Hi Jörg,versuchs mal mitDim obj As AcadObjectSet obj = AutoCAD.Application.ActiveDocument.ModelSpace.Item(AutoCAD.Application.ActiveDocument.ModelSpace.Count - 1)hd = obj.HandleGrüsse, Henning------------------VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD Produkt Informationen
CADmium am 20.08.2007 um 16:06 Uhr (0)
du kannst u.a. die Systemvariablen (1.) PRODUCT ,(3.) ACADVER und (4.) _PKSER abfragenDie Registry liefert aber unter HKEY_LOCAL_MACHINI - SOFTWARE - AUTODESK - AUTOCAD aber auch entsprechende Einträge------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Dirk.B am 21.08.2007 um 21:31 Uhr (0)
Hallo zusammen!Erst noch einmal Danke für Eure Hilfe.Mit dem Tool zum schreiben bzw. bearbeiten einer INI Datei funktioniert soweit gut.Wie befüll ich denn nun das TreeView, wie in dem TreeView_Test von Stelli1 beschrieben mit dem Inhalt aus der INI Datei?INI-Datei:[Scharniere]Holz=J:AutoCAD_2007DB_TuningBloeckeScharniereGlas=J:AutoCAD_2007DB_TuningBloeckeScharniere[Schlösser]Holz=J:AutoCAD_2007DB_TuningBloeckeSchloesserGlas=J:AutoCAD_2007DB_TuningBloeckeSchloesser[Verbindungen]Holz=J:AutoCAD_2007DB_Tuning ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : TreeView - Steuerelement
Stelli1 am 24.08.2007 um 10:40 Uhr (0)
Hallo Dirk,hier mal ein Beispiel. Leg dir ein Formular an un erzeuge die drei Controls und füge den Code ein.Code: ## Formular mit Treeview = Treeview Textfeld = txt_IniDatei Button = BT_FillTreeViewPrivate Sub BT_FillTreeview_Click() Dim vlst_IniDatei As String Dim olcl_IniDatei As New cls_Info_INIDATEI Dim vlva_TopicList As Collection Dim vlva_Topic As Variant Dim vlva_KeyList As Variant Dim vlva_Key As Variant Dim vlst_Value As String Dim olct_RoorNode As Node Dim olct_Topi ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD Produkt Informationen
Airam am 22.08.2007 um 10:34 Uhr (0)
Habe leider nichts in der Registry unter AUTOCAD gefunden. Mein registry-script hat die Angaben in Add/Remove software abgefragtProduct Name und Product Version beknomme ich auch wenn ich WMIService einsetze, objWMIService.ExecQuery ("Select * from Win32_Product Where Caption like %autoC%") mit objCad.Caption und objCad.Version aber wiederum nicht License ID und Product Serial Number. Ein anderer Weg wäre vielleicht eine Instanz von AutoCAD zu öffnen mit Set objACAD = CreateObject("AutoCad.Application") ...
|
| In das Form AutoCAD VBA wechseln |
