|
AutoCAD VBA : Alle Layer in Layouts auflisten
michimueller am 25.08.2015 um 15:38 Uhr (1)
Hallo Kollegen,bin neu hier und beschäftige mich schon seit einiger Zeit mit Autocad-VBAnun zu meiner Frage:auf dem Layout befinden sich verschiedene Objekte(Texte, Schraffuren, Kreise usw) die alle verschiedenen Layern zugewiesen sind.Wie kann ich auslesen welche Layer sich auf dem Layout befinden. ich will eine Liste haben, wo ich sehe, welcher Layer sich auf welchem Layout befindet.hoff ich hab mich klar ausgedrückt :-) code wär super.. ein kleiner Anfang reicht, sowas wie: for each layer in this Drawin ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Alle Layer in Layouts auflisten
cadffm am 25.08.2015 um 15:52 Uhr (1)
ohne Code:Durchlaufe alle Bereich (also ohne den Modellbereich zu berücksichtigen)Pro Bereich erstellst du eine Liste *G*Durchlaufe im Bereich alle Objekte, wenn Layer des Objektes bereits in Liste"aktuellerBereich" vorhandenist, nächsten Objekt, wenn Layer noch nicht in Liste steht, hinzufügen.Wenn du auf Blockreferenzen stößt ist die Frage ob dich auch Lyer in Blockdefinitionen&Attribute interessieren?Dann wird es aufwändig(er).Und mit angebzeigten Objekten in Ansichtsfenster aus dem Modellbereich hat da ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Schweißsymbole in AutoCad Mechanical automatisieren
2paul am 28.08.2015 um 10:07 Uhr (1)
Hallo,wir sitzen gerade an dem Problem, dass sich Schweißsymbole in Inventor nicht automatisieren lassen, da gibt es keine API für.Weiterhin sind die Symbole nicht so gut modifizierbar, wie in ACad.Jetzt war unsere Idee das Ganze mit ACad zu lösen.Wir wollen aus Inventor eine DWG exportieren, die alle Informationen für die Schweißnaht als Führungstext angehängt bekommt.Nummer, Kehl- oder Füllnaht und a-Wert.Jetzt wollte ich fragen, ob es in AutoCad Mechanical die Möglichkeit gibt, diesen Führungstext auszu ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Schweißsymbole in AutoCad Mechanical automatisieren
CAD-Huebner am 30.08.2015 um 09:28 Uhr (1)
Beim Autodesk Developer Networksteht imAutoCAD Mechanical 2016 Developer’s Guideacmdevguide_20_0.chm (chm - 718Kb) ein Symbols Sample Code - Adding a Welding Symbol (mit Bildern)Code:Dim symbb As McadSymbolBBMgrSet symbb = ThisDrawing.Application.GetInterfaceObject("SymBBAuto.McadSymbolBBMgr")Dim points(0 To 5) As Doublepoints(0) = 10#: points(1) = 10#: points(2) = 0#points(3) = 11#: points(4) = 11#: points(5) = 0#Dim weldsym As McadWeldingSet weldsym = ThisDrawing.ModelSpace.AddCustomObject("AcmWelding") ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Schweißsymbole in AutoCad Mechanical automatisieren
2paul am 30.08.2015 um 14:12 Uhr (1)
Erstmal vielen Dank für die umfangreiche Antwort.ja, die erste Idee war auch eigene Symbole zu programmieren, aber leider lassen sich die Symbole nicht spiegeln, und die sehen nach Norm gespiegelt anders aus,man hätte also alle von einer Seite anziehen müssen, das ist bei der Masse an Schweißnähten nicht möglich.Jetzt wäre noch die Frage, ob das theoretisch in Mechanical möglich ist:Frage den Inhalt eines Führungstextes, den ich in Inventor erzeugt habe ab.Frage das Objekt (Linie) ab, dass mit der Führungs ...
|
| In das Form AutoCAD VBA wechseln |
WMFdokumentation.zip |
AutoCAD VBA : AutoCAD WMF in Word einfügen und komprimieren
Simon Pie am 23.07.2014 um 18:33 Uhr (1)
Hallo,ich habe mal das Programm als Worddocxument hochgeladen.Gruß Simon
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD WMF in Word einfügen und komprimieren
Simon Pie am 02.09.2015 um 23:35 Uhr (1)
Hallo Leute,ich habe das Tool jetzt auf Wot-WMF veröffentlicht.
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : objekte auf einem Layer ablaufen
cadffm am 02.09.2015 um 10:53 Uhr (1)
Da Layer keine Ebenen sind gibt es das nicht, wenn einem TopLevel Elemente ausreichen(keine Verschachtelten Objekte), so könnte man eine AUSWAHLSATZ erstellen und diesen durchlaufen / selectionset.Nutze das mal als Suchbegriff!------------------CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad PDF Druck Probleme
KlaK am 07.09.2015 um 17:26 Uhr (1)
Hallo Michi,Kann es sein dass die neu erzeugte pdf-Datei im Hintergrund noch geöffnet ist?Ansonsten würde ich die verschachtelte Anweisung einmal auflösen und einzelne Zeilen machen. Wo stürzt es dann ab?Zeichnung wurde gespeichert (ThisDrawing.Fullname nicht leer)?Ohne den gesamten Code zu kennen ist das schwierig.Außerdem könntest Du Dir einen Error Handler einbauen um zu sehen ob das wirklich der spezifische Fehler ist?Code:On Error GoTo err_Handler (Dein Code hier)Exit Suberr_Handler: MsgBox "Fehler " ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad PDF Druck Probleme
KlaK am 07.09.2015 um 17:55 Uhr (1)
Evtl. liegt es auch daran dass Du bei Replace(ThisDrawing.FullName, "dwg", "pdf")in Deinem Code vor dem pdf noch einen . hast
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Schweißsymbole in AutoCad Mechanical automatisieren
2paul am 08.09.2015 um 10:35 Uhr (1)
Ich wollte nur kurz nochmal Feedback geben:Ich habe es jetzt soweit fast alles gelöst, Inventor erzeugt "Führung" und "MText" Kombinationen, die sich in Mechanical abfragen lassen.Damit habe ich den Start der Führungslinie (leider nicht das verbundene Objekt/Linie) und auch den Inhalt des Textfeldes.Mit diesen Informationen kann ich in Mechnical ein neues Schweißsymbol an der Position erzeugen.Das Einzigste wo ich noch Schwierigkeiten habe, ist bei der Erzeugung des Schweißsymbols, der Beispielcode aus der ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : RGB Farbe Helligkeit
Brischke am 11.09.2015 um 12:43 Uhr (1)
Zitat:Original erstellt von otm:... Der Layer hat eine RGB-Farbe.Mit Brightness komme ich hier nicht weiter.Soweit ich das kenne, ist die Helligkeit bei den RGB-Farben im AutoCAD immer mit 100% (hex: FF) angegeben.Grüße!Holger------------------Holger BrischkeCAD on demand GmbHIndividuelle Lösungen von Heute auf Morgen.defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Schweißsymbole in AutoCad Mechanical automatisieren
2paul am 08.10.2015 um 16:37 Uhr (1)
Ich habe das Projekt jetzt so weit, dass ich es präsentieren kann, die größten Schwierigkeiten hat das Schweißsymol im Mechanical gemacht.Die Dokumention und das Beispiel ist das einfach falsch.Die richtige Syntax wäre z.B.:weldsym.Type(False, 0, True) = sbFilletWeldweldsym.DepthValue(False, 0, True) = Symbol_aWertund nichtweldsym.Type = sbBevelGrooveWeldweldsym.DepthValue = "a5"Anbei das Video der Präsentation des Projekts:PräsentionsVideo bei Youtube[Diese Nachricht wurde von 2paul am 08. Okt. 2015 editi ...
|
| In das Form AutoCAD VBA wechseln |
