| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Punkte in Polylinie löschen (10299 mal gelesen)
|
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 09:07 <-- editieren / zitieren --> Unities abgeben:
|
charlieBV Ehrenmitglied V.I.P. h.c. Bauzeichnerin
Beiträge: 9317 Registriert: 28.08.2003
|
erstellt am: 19. Feb. 2009 09:16 <-- editieren / zitieren --> Unities abgeben: Nur für dias
|
Kramer24 Ehrenmitglied V.I.P. h.c. Architekt
Beiträge: 5881 Registriert: 09.11.2001 Acad Architecture 2023 WIN 10
|
erstellt am: 19. Feb. 2009 09:18 <-- editieren / zitieren --> Unities abgeben: Nur für dias
|
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 09:25 <-- editieren / zitieren --> Unities abgeben:
Ich denke, ich hab das schon mal mit PEDIT gemacht. Ist aber schon lange her, und mir fällts nicht mehr ein. Weiß jemand wie es geht? Die LISP - Sachen werde ich später mal probieren, wenn mehr Zeit ist... Danke! Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Kramer24 Ehrenmitglied V.I.P. h.c. Architekt
Beiträge: 5881 Registriert: 09.11.2001 Acad Architecture 2023 WIN 10
|
erstellt am: 19. Feb. 2009 09:26 <-- editieren / zitieren --> Unities abgeben: Nur für dias
|
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 09:33 <-- editieren / zitieren --> Unities abgeben:
Mit der Funktion "Linie" in PEDIT geht es, allerdings wirklich sehr umständlich und nicht gleich durchschaubar. Hab auch nochmal in der Acad-Hilfe nachgelesen, was ich sonst nur selten mache, weil man ja hier im Forum meist schneller und präziser Antworten bekommt... :-) Vielen Dank für alle Hilfe! Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bikerholic Mitglied Bauzeichner Straßenbau
Beiträge: 123 Registriert: 06.02.2009 XP Professional SP2 Intel Pentium x86 2.40GHz 1GB-Ram, Maxtor 60GB NVIDIA GeForce4 MX 420 mit 64MB AutoCAD 2005&2008&2010(Civil3D)+SP2+Expresstools google und ich san beste freunde ;)
|
erstellt am: 19. Feb. 2009 11:26 <-- editieren / zitieren --> Unities abgeben: Nur für dias
servus martin, also wenn dir des mit dem PEDIT zu umständlich is dann nimm doch einfach des lisp tool vom Axel habs ausprobiert funkt genau so wie dus dir gewünscht hast Zitat: Original erstellt von mapcar: Eine kleine Lisproutine. Polylinie anklicken, Punkt anklicken, weg isser.(defun lwpl-delvtx(lwpl point fuzz / edata modd) (setq point(list(car point)(cadr point))) (setq edata(entget lwpl)) (while edata (if(or(/=(caar edata)10)(not(equal(cdar edata)point fuzz))) (setq modd(cons(car edata)modd)edata(cdr edata)) (princ(setq edata(cddddr edata))) ) ) (entmod(reverse modd)) ) (defun c:lwpl-delvtx( / ) (lwpl-delvtx (car(entsel"Polylinie wählen: ")) (getpoint "Stützpunkt wählen: ") 0.0001 ) ) Allerdings nicht sehr getestet und ohne jedes Errorhandling. Gruss, Axel
gruß björn ------------------ Wenn Arbeit etwas schoenes und erfreuliches waere, haetten die Reichen sie nicht den Armen ueberlassen. [Paul Lafargue] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 12:54 <-- editieren / zitieren --> Unities abgeben:
Ähmm... sorry... wie bekomme ich diese Lisproutine zum laufen ? Habe so etwas noch nie gemacht. Bis jetzt habe ich nur fertige Lisp heruntergeladen und dann über die Befehlszeile gestartet. Danke! Matthias Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 19. Feb. 2009 12:58 <-- editieren / zitieren --> Unities abgeben: Nur für dias
Mal was zum ausdrucken .. zum Thema "Lisp laden" .. in deinem Fall hilft wohl: Es kann natürlich auch sein, dass das Lisp als Text in einem Forenposting steht, als Text mit vielen, vielen Klammern. In dem Fall ist dieser Text von der ersten öffnenden Klammer bis zur letzen schließenden Klammer zu markieren und STRG+c für „Kopieren“ zu drücken. Anschließend ist ein Texteditor ohne Formatierung wie z.B. Notepad zu starten, Strg+V für „Einfügen“ zu drücken und die Textdatei mit Inhalt zu speichern. Als letzter Schritt wird die gespeicherte Datei als *.LSP umbenannt. (Man kann beim speichern auch Dateityp "*.*" einstellen und im Namen gleich .lsp anhängen) Anmerkung: Das Minilisp behandelt nur LW-Polylinien und löscht je Aufruf einen Stützpunkt(der auch gefangen werden muß). ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Entsorger01 Moderator Techniker
Beiträge: 3263 Registriert: 07.07.2006 ACAD 2021 Acrobat Prof. Creative Suite WIN10
|
erstellt am: 19. Feb. 2009 12:59 <-- editieren / zitieren --> Unities abgeben: Nur für dias
|
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 13:30 <-- editieren / zitieren --> Unities abgeben:
|
Entsorger01 Moderator Techniker
Beiträge: 3263 Registriert: 07.07.2006 ACAD 2021 Acrobat Prof. Creative Suite WIN10
|
erstellt am: 19. Feb. 2009 13:39 <-- editieren / zitieren --> Unities abgeben: Nur für dias
Warum machst Du dir nicht einfach einen Button für die Lisp, wenn du den Text nicht ständig tippen willst? Code: ^C^C BEFEHLSAUFRUF
------------------ Gruß Michi "Personalführung ist die Kunst, die Mitarbeiter so schnell über den Tisch zu ziehen, dass sie die Reibungshitze als Nestwärme empfinden." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 13:55 <-- editieren / zitieren --> Unities abgeben:
Gute Idee, wollt ich grade probieren. In ACAD 2000 war das alles kein Problem, da hab ich das öfters gemacht. Aber mit dem 2008 ér krieg ichs einfach nicht hin... Wie macht man sich so einen Button im 2008 ér und hinterlegt ihn mit einem Befehl? Matthias (der sich so langsam für seine Unkenntnis schämmt...)
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
runkelruebe Moderator Straßen- / Tiefbau
Beiträge: 8075 Registriert: 09.03.2006 Kinder, kauft Kämme! Es kommen lausige Zeiten.
|
erstellt am: 19. Feb. 2009 13:57 <-- editieren / zitieren --> Unities abgeben: Nur für dias
|
dias Mitglied Bauzeichner
Beiträge: 124 Registriert: 03.02.2009 AutoCad Map 3D 2016 Win7 AMD Athlon 64 X2 Dual CORE Prozessor 5200+ 2.71 GHZ 1.93 GB RAM NVIDIA GeForce 6150 LE HP DJ 750C Plus
|
erstellt am: 19. Feb. 2009 15:19 <-- editieren / zitieren --> Unities abgeben:
Yipphiii !!! Es funktioniert! Endlich kann ich wieder eigene Schaltflächen kreieren und mit Befehlen hinterlegen... ! Ist aber in der 2008 ér wirklich nicht so einfach zu finden... Danke für alle Hilfe und schönen Feierabend ! Matthias
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bikerholic Mitglied Bauzeichner Straßenbau
Beiträge: 123 Registriert: 06.02.2009 XP Professional SP2 Intel Pentium x86 2.40GHz 1GB-Ram, Maxtor 60GB NVIDIA GeForce4 MX 420 mit 64MB AutoCAD 2005&2008&2010(Civil3D)+SP2+Expresstools google und ich san beste freunde ;)
|
erstellt am: 19. Feb. 2009 15:47 <-- editieren / zitieren --> Unities abgeben: Nur für dias
Zitat: Original erstellt von dias:
Kann man auch den Startbefehl der Lisp ändern?
einfach in der lisp datei an der stelle ---> "(defun c:lwpl-delvtx( / )" das "lwpl-delvtx" ändern in dein befehlausdrucksfolge z.b. "ppl" für polylinienpunktlöschen wünsche auch nen schön feierabend tschau björn
------------------ Wenn Arbeit etwas schoenes und erfreuliches waere, haetten die Reichen sie nicht den Armen ueberlassen. [Paul Lafargue] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |