|
Rund um AutoCAD : Ordinatenbemassung, tausche X-Daten gegen Y-daten
Dorfy am 11.08.2009 um 14:14 Uhr (0)
Hi Christoph,weils Spaß macht (defun c:xy-ord3 (/ ent dpy dpy vtex entlax) (if (and (setq ent (vl-catch-all-apply entsel (list "
Wähl mal ne Polylinie: ") ) ) (setq dpx (vl-catch-all-apply getpoint (list "
X-Line: ") ) ) (setq dpy (vl-catch-all-apply getpoint (list "
Y-Line: ") ) ) (setq vtex (vl-remove-if-not (function (lambda (v /) (member (car v) (10)))) (entget (car ent)) ) ) ) (foreach v vtex (command "_dimordinate" (cdr v) "X" (lis ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Codepageproblem alter R12 Zeichnungen unter AutoCAD R2005
WolfgangSCH am 01.01.2005 um 17:34 Uhr (0)
Hallo Werner, vielen Dank für Deine Antwort und das Programm. Solch eine ähnliche Lisp-Routine besitze ich schon. Hiermit kann ich zwar die Umlaute ersetzen, aber die alte Codepage bleibt weiterhin in der DWG. Ich behelfe mir zur Zeit damit, dass ich die Codepage in der DWG mit dem Programm AutoCAD Code Page Manipulation Utility tausche und die DWG mit AutoCAD R2002 aufrufe und speichere. So werden die Umlaute korrekt dargestellt und ich kann die DWG anschließend mit AutoCAD R2005 weiter verarbeiten. Ich s ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Schnittpunkt
CADmium am 07.09.2005 um 16:23 Uhr (0)
ein kleines Lisp zum Thema:(defun c:Testus(/ OBJ1 OBJ2 VOBJ1 VOBJ2 PKTS POINTS PKT) (if(and(setq OBJ1(car(entsel "
Objekt1 : "))) (setq OBJ2(car(entsel "
Objekt2 : "))) (setq VOBJ1(vlax-ename-vla-object OBJ1)) (setq VOBJ2(vlax-ename-vla-object OBJ2)) (setq PKTS(vla-intersectwith VOBJ1 VOBJ2 acExtendNone)) (setq PKTS(vlax-safearray-list(vlax-variant-value PKTS))) ) (progn (repeat (/(length PKTS)3) (setq POINTS(cons(list(car PKTS)(cadr PKTS)(caddr PKTS))POINTS)) (setq PK ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Hash in Polyline umwandeln
mr_jones1971 am 28.06.2004 um 15:54 Uhr (0)
Vielen Dank Proxy leider noch nicht ganz die Lösung für mein Problem. Ich entschuldige mein Anfängerhaftes Dasein, ich benutze AutoCAD 2002. Im Anhang siehst Du was ich eigentlich haben möchte: Eine Schraffur umwandeln in EINE Polylinie, die ich dann mit einem Laser abfahren kann (Flächenabtragung mit Linienabstand = Fokusbreite), d.h. exportieren einer zusammenhängenden Polylinie in ein Datenfile, das ich mit LabView wieder einlesen kann. Was ich momentan geschafft habe ist (nach deiner Anleitung), ein Si ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : MTexte in Text umwandeln
tom.berger am 10.06.2004 um 13:15 Uhr (0)
Zitat: Original erstellt von furter: Genau das ist das Problem. Ich möchte nicht Layer-weise sprengen, sondern sämtliche Mtexte in der Zeichnung auf einmal. Danach sollten alle Texte ihren ursprünglichen Layer ausweisen. Naja, um das zu automatisieren brauchst Du dann halt ein paar Zeilen LISP. Alle MTEXTe selektieren, und dann für jedes einzelne den aktuellen Layer auf den MTEXT-Layer legen und das Teil dann explodieren lassen. Ohne Test hier eingehackt lautet das dann ungefähr so: (defun c:mt-ex ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Texte ersetzen
Brischke am 04.11.2003 um 13:14 Uhr (0)
Hallo Ralle,ein solches Tool habe ich einmal erstellt. Es tauscht die Texte entsprechend einer Vorgabe aus einer Exceltabelle (Spalte A = alter Text, Spalte B = Neuer Text).Momentan funktioniert das nur für Attribute, sollte aber ein leichtes sein, dies auf alle Texte auszuweiten.Ebenfalls für Attribute, habe ich ein eigenes Suchen und Ersetzen geschrieben. Dieses tauscht nur Texte, die einem bestimmten Suchmuster entsprechen, und dann auch nur bestimmte Zeichen (vom Anfang, vom Ende, ab Stelle - bis Stell ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Systemvariable gesucht!
j-sc am 08.12.2003 um 16:56 Uhr (0)
Hallo, das Verstellen der Systemvariablen ist ein recht unschöner Nebeneffekt der gehäuft auftreten kann, wenn viel mit Fremdzeichnungen oder DXF-Daten gearbeitet wird. Auch Applikationen tun manchmal alles, einem die Laune zu verderben. Abgebrochene LISP-Routinen sind auch beliebte Kandidaten dafür. Schreib Dir doch einfach ne Routine mit den ganzen Variablen und Deinen Einstellungen derselben und lad sie bei Bedarf (oder auch automatisch) wieder neu ein. Meine Hitlist dafür übrigens (kein Anspruch auf V ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : AutoCAD und Bauzeitplan verknüpfen
cadffm am 20.09.2018 um 10:56 Uhr (1)
Zitat:Original erstellt von OliCAD92: (gibt es dafür ein allgemeinen Command?)(command ...) ist nur die Lisp-Funktion um Eingaben in die Befehlszeile zu senden, mehr nicht.Der - ganz normale- Befehl lautet -LAYER und den kannst du ganz normal nutzen,dabei siehst du dann auch welche Optionen dieser bietet und wie häufig in Acad kannst duauch in vielen Optionen mit Wildcards/Platzhalten arbeiten.Ich finde die Hilfeseite für normale Anwender gerade nicht, daher der Link zu dieser Seite: Klick!Ignoriere die Li ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : AutoCAD Makro
alfred neswadba am 12.02.2009 um 20:32 Uhr (0)
Hi Stefan,Als AutoCAD-Newcomer gleich mit Makros zu beginnen? Ist nicht ganz der Weg, der normalerweise bestritten wird!Um nicht umsonst zu arbeiten, ein paar Fragen vorab (und lass mich auch gleich wissen, wos Dir zu tief wird):a) bisschen Hintergrundinfo, z.B. was machst Du, wenn die Punkte erzeugt sind? Wo und wie brauchst Du diese in der weiteren Arbeit, wären da nicht eventuell Blöcke interessanter?b) Was soll bei geschlossenen Polylinien passieren? Da sind ja Start- und Endpunkt an der gleichen Posit ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : E-Mail senden per Makro
Brischke am 19.05.2003 um 08:52 Uhr (0)
Hallo Zeli, das kannst du mit einem DOS-Aufruf von Outlook machen. (setq befehl (strcat "c:R14SUPPORToutlook.lnk /c ipm.note." formname " /a " datei)) (command "shell" befehl) formname = Name des outlook-Formulars, diese muss zuvor mit eingetragenen Empfänger angelegt sein. Da kann dann auch schon der Text mit drin stehen. datei, ist die Datei, die an das mail drangehangen wird. Da die Zeichnungsdateien oftmals zu groß sind, habe ich diese vorher dann immer gezippt. (setq befehl (strcat "c:programmewinzipw ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Linienstärke im Lispprogramm
fuhand am 19.11.2003 um 15:07 Uhr (0)
Hallo zusammen, wie kann ich einem Layer eine Linienstärke in einem Lisp-Programm zuweisen? Der nachfolgende Progammausschnitt wurde nicht von mir geschrieben und sollte nun so verändert werden, dass der Layer Text_0.5 die Liniestärke 0.5mm und der Layer schmale Volllinie 0.25mm einnimmt. Danke Andreas (defun C:POS_NUM (/ NUM P1 P2 DXX DX DYY DY) (defun NEUERR (MSG) (R_VAR) (princ MSG) (princ)) (setq ALTERR *ERROR* *ERROR* NEUERR C_E (getvar CMDECHO ) ; ECHO C_L (getv ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : mehrere Befehle automatisieren
koctho01 am 22.03.2021 um 17:32 Uhr (1)
Hallo Leute,ich muss gelegentlich sehr viele DXF Dateien immer mit den gleichen Dingen bearbeiten.Er geht darum, die Dateien- 1. bestimmten Layer innerhalb der Datei sollen gelöscht werden- 2. die Datei soll danach bereinigt werden- 3. die Datei soll mit dem gleichen Namen unter einem neuen Verzeichnis gespeichert werdenZu 1.: Das habe ich mit Hilfe eines eigenen Objektfilters (filter.nfl) gelöst und funktioniert soweit gut. Da es aber sehr viele Dateien sein können, dachte ich mir, man kann das Ganze viel ...
|
| In das Form Rund um AutoCAD wechseln |
 |
Rund um AutoCAD : Block umbenennen durch Objektwahl
fuechsin am 19.05.2020 um 14:17 Uhr (15)
Hallo Lothar,ich habe im Netz ein Tool gefunden um unbenannte Blöcke umzubenennen und eine Routine namens "MultiRename" mit der man die auszuwählenden Blöcke filtern kann. Das ist sicher nützlich, aber nicht das was ich suche. Ich möchte einen Block durch zeigen (anklicken) auswählen und ihm einen neuen Block-Namen zuweisen (einzeln). Der Original-Name ist so lang und unlogisch, dass ich mir die Zeichenfolge nicht merken kann, um ihn in der Liste von umbenenn-Blöcke wiederzufinden. Deshalb würde ich gern m ...
|
| In das Form Rund um AutoCAD wechseln |
