|
Rund um Autocad : Speichern unter
SebZ am 23.05.2007 um 13:14 Uhr (0)
Hallo Alfred,wenn du dich ein bisschen mit Lisp auskennst, könnte dieser Codeschnipsel funktionieren (unter 2004 ungetestet).Nach Belieben kannst du den Zeichnungsnamen noch einstellen. Mit den Systemvariablen DWGPREFIX und DWGNAME hast du Zugriff auf den aktuellen Pfad und Namen deiner Ausgangsdatei, aus denen du ja vielleicht noch eine neue Bezeichnung bilden möchtest.Code:(defun c:multisave() (setq fd-alt (getvar "FILEDIA")) (setvar "FILEDIA" 0) (command "_saveas" "2004" "") (command "_saveas" "DXF" "V" ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Dyhamische Blöcke tauschen
marc.scherer am 28.07.2009 um 09:40 Uhr (0)
Hi Mangrove,Du könntest mal versuchen mit folgendem Lisp einen internen dynamischen Block mit ner externen DWG die einen dynamischen Block definiert upzudaten. Bei normalen Blöcken funktioniert das problemlos, wozu das bei dynamischen Blöcken führt kannst Du ja einfach mal ausprobieren. Übrigens kann bei dieser Lösung der externe Name sich vom internen Namen der Blockdefinition komplett unterscheiden (siehe Kommentare am Anfang des Progs...)Update: Ich hab auch noch mal berücksichtigt, das der Blockname am ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Autocad Flächenberechnung
Brischke am 04.06.2004 um 11:18 Uhr (0)
Hallo seven, das Schraffurobjekt weiß ja selbst innerhalb welcher Grenzen es sich befindet. Diese Grenzen liest das Programm aus und bastelt daraus eine Polylinie. Die Schwierigkeit besteht nur darin diese Umgrenzungspfaddaten richtig zu interpretieren, da diese doch recht komplex sind. Interessanter wird das ganze allerdings, wenn die Schraffur explodiert wurde, also keine Schraffur mehr ist. Ich habe auch dafür mal ein Tool geschrieben, welches bisher allerdings nur mit aufgelöster Linien-Schraffur unt ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Linie mit Symbol
jupa am 21.06.2017 um 15:18 Uhr (1)
Zitat:Original erstellt von Kris RE:Ich versuche es nochmal.Das ist ja ein ziemlich anspruchsvolles "Aufgabenpaket".Ich möchte eine Linie/Polylinie zeichnen die zwischen dem Anfangspunkt und dem Endpunkt genau mittig ein Block/Symbol enthält. Das heißt für mich, daß man evtl. einen neuen Zeichenbefehl definieren müßte, der genau diese dynamische Objektkombination (Linie+Symbol) erstellt. Das beißt sich aber mit der nächsten Forderung, "Desweiteren wäre es wichtg, aus anderen Zeichnungen importierte Linien, ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Maximal Anzahl Layer in AutoCAD
Proxy am 09.12.2004 um 10:14 Uhr (0)
Wer schon mal "just 4 fun" eine BruteForce geschrieben hat kann bestimmt folgen. *Taschenrechnerauspack* Bei einem 9 Zeichen langen Passwort und einem 255 Zeichen umfassenden Zeichesatz gibt es 255 hoch 9 Möglichkeiten. Das sind 4.558.916.353.692.287.109.375. das reicht ja schon meisten für eine "Architekurgerechte Zeichnung" wen jedoch 255 hoch 255 erfolgen musst sind wir ja leider momentan etwas technisch begrenzt, also mein Taschenrechenr will da unbediengt immer eine Raucherpause einlegen. Als Schä ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : alle Objekte auf einen Layer schieben
CADJojo am 23.11.2011 um 09:50 Uhr (0)
Hallo cadffm,danke für die Antwort so früh am Morgen."Lese mal die AutoCADhilfe zu Ursprung(_explode), da wirst du eine interessante Anmerkung finden"Ja, hab´s gefunden, danke!"Nutzt Ihre keine Attribute ? ....Nur im Schriftkopf"...LAYZUSF(_laymrg)..."hatte ich schon probiert...."...ÄNDERN(_change) würde aber auch gehen - ohne unnötige Objekte zu erzeugen."DAS hatte ich noch nicht probiert, danke!"Wegen den Layouts....."Die können auch drin bleiben, ich hab das nur erwähnt falls es zur Fehlersuche wichtig ...
|
| In das Form Rund um AutoCAD wechseln |
 |
Rund um AutoCAD : Xref Pfad per Lisp Ändern
cadffm am 25.11.2016 um 01:32 Uhr (15)
Zitat:Mit deiner letzten Antwort haben wir nun eine versteckte Information mehr:Der letzte Ordner hat nicht immer denselben Namen (D1 kann also auch mal D2 D3 oder D4 heißen),in dem Fall passt mein Beispiel zur Pfad-Bearbeitung mittels zweier vl-string-subst nicht mehr,man müßte es also anpassenJa, es geht und vieles mehr noch.Sicher kann man auch ein explorer-Fenster relativ zu einem zweiten steuern(dein anderer Thread).Nur ist dein Anwendungsfall sehr spezifisch und da gibt es nichts von der Stange.Ich b ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Möbelfront einteilen (Strecke mit Abständen teilen)
Alfonso am 21.07.2007 um 14:57 Uhr (0)
Hallo snoop,ich teile meine Schrankfronten immer mit folgendem Lisp ein. (defun c:schrankfronten (/ P1 P2 A1 A2 AL AR AU AO AM breite hoehe osmode) (setq P1 (getpoint "
Untere linke Ecke angeben:")) (setq P2 (getcorner P1 "
Obere rechte Ecke angeben:")) (setq A1 (fix (getdist "
Zeilenanzahl angeben:"))) (setq A2 (fix (getdist "
Spaltenanzahl angeben:"))) (setq AL (getdist "
Abstand links angeben 0:")) (setq AR (getdist "
Abstand rechts angeben 0:")) (setq AU (getdist "
Abstand unten angeben 0:")) (setq AO ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Abgestufte Schraffur > pdf
Proxy am 07.02.2005 um 19:19 Uhr (0)
Es wäre schön wenn du die eingesetzte Software (PDF) etwas genauer beschreiben würdest, mit den entsprechenden Parametern. Ich würde sagen dass erst dort die Einstellungen vorzunehmen sind wenn es wirklich diese gradient hatch oder noch schlimmer diese RAL, PANTONE Dingsbumms Schraffis, sein müssen. Meistens ist der Farbraum und die DPI viel zu hoch in den meisten PDF eingestellt d.h. es wird ein Datenoverkill innerhalb der Datei in Verbindung zum Einsatzort (Tintenpisser, Color-LJ-Printer, Profi-Druck ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Hilfe! Plotten vieler Zeichnungen mit AutoCAD 2000
Brischke am 30.09.2004 um 09:09 Uhr (0)
Zitat: Original erstellt von wiwo: das ist gar nicht gut. Finde ich aber ziemlich schwach von AutoCAD wenn es da nicht einmal eine einfache Möglichkeit gibt mehrere Blätter mit einem Klick auszudrucken. Tja, das geht schon, mit den Migrationstools, in welchen der Batch-Plotter enthalten ist. ABER: Zeichnungen sind in aller Regel keine Word-Dokumente, in denen die Seiteneinrichtung immer gleich ist. Deshalb existiert ja zu jedem Layout eine Seiteneinrichtung. Woher soll das Programm aber nun wis ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Pixelbilder ändern ihre Anzeigereihenfolge nicht
charlieBV am 14.07.2005 um 08:54 Uhr (0)
Hi Anja, das ist dann relativ logisch, die Variable gibt es erst sein 2005. Wenn du uns verraten hättest welche Version du verwendest, dann hätten wir das gleich gewusst. Hat deine Kollegin die gleiche Version wie du? Sonst hilft dir dieses Lisp vielleicht: (defun c:kol () (AUSWAHL) (command ._copy ausw 0,0,0 0,0,0 ) (command ._erase ausw ) (princ) ) (defun AUSWAHL () (princ
Bitte die zu bearbeitenden Elemente auswählen ) (setvar cmdecho 0) (setq ausw(ssget)) ) Nennt sich Kol und kopiert ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : absturz durch polylinie
m-troeger am 21.02.2002 um 19:25 Uhr (0)
Hallo zusammen, es gibt noch einen weiteren Fehler bei den POLYLINIEN. Ich zeichne zwei POLYLINIEN auf dem Layer 1, irgendwann verbinde ich diese POLYLINIEN oder füge z.Bsp. in einer von beiden einen neuen Kontrollpunkt ein, wobei mein aktueller Layer der Layer 2 ist, so liegen die einzelnen Kontrollpunkte der Polylinie auf unterschiedlichen Layern, obwohl die Polylinie selbst noch auf dem Layer 1 liegt. Das ist echt phantastisch HA HA. Wenn wir nun die Daten als DXF usw. weitergeben, entsteht dort das rei ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Export von Koordinaten mittels VBA
a.hinke am 14.07.2021 um 08:10 Uhr (15)
Das ging alles schneller als erwartet.Ich bin am Ende bei VBA geblieben, auch wenn ich über LISP das gleiche Ergebnis erzielen konnte.Hier mein VBA--------------------------Sub Bohrdaten() Dim Obj As AcadObject Dim circleObj As AcadCircle Dim X As String, Y As String Dim layerEntry As AcadLayer Open "PfadBohrdaten_AutoCAD.bor" For Output As #1 Print #1, "%3000" For Each layerEntry In ThisDrawing.Layers If layerEntry.LayerOn = True Then Print #1, layerEntry.Name For E ...
|
| In das Form Rund um AutoCAD wechseln |
