|
ADT Architectural Desktop : Block in Zeichnung bearbeiten
tmoehlenhoff am 15.03.2004 um 21:20 Uhr (0)
Na dann wage ich doch mal einen zarten Versuch einer möglichen Anwort: Ich denke nicht, dass man das ohne Programmierung gelöst bekommt und selbst das sind dann sicher mehr als eine handvoll Zeilen Lisp oder VBA. Parallel zur Programmierung hätte ich noch zwei weitere Ideen: - Man legt sich ein Update auf ADT 2005 zu, denn dort kann man alle errechneten Schnitte und Ansichten eines Projektes (nicht einer Zeichnung !!!) auf Knopfdruck aktualisieren. - Man baut sich einen eigenen Kopf in eine Werkzeugleiste, ...
|
| In das Form ADT Architectural Desktop wechseln |
|
Lisp : Polylinien abhängig vom Startpunkt versetzen
m.hacker am 28.08.2015 um 13:52 Uhr (1)
Hallo,wo ich stehe?Natürlich ganz am Anfang!Polylinien sind nicht immer geschlossen, kann aber vorkommen.Die Linien müssen immer 1.00m versetzt werdenMir schwebt folgende Lösung vor.Alle Polylinien wählen die versetzt werden sollen. Dann müsste für jede Polyline dieser Ablauf passieren. 1. Startkoordinaten (A) der Polylinie auslesen 2. Erste Segmentkoordinate(E) der Polyline auslesen 3.Linie zeichnen auf neuem Layer "temp" von A zu E mit einer Länge 1/2 AE 4.Linie drehen mit Basis A und Winkel 1 G ...
|
| In das Form Lisp wechseln |
|
Lisp : Punktkoordinaten aus Datei auslesen
alfred neswadba am 25.11.2008 um 11:18 Uhr (0)
Hi,Willkommen in CAD-de!Deine Aufgabe erinnert mich an einen vor kurzem eingestellten Thread mit einem Titel ähnlich Sichtweiten == kann es sein, dass Du an gleichem/aehnlichem arbeitest?Zusammenfassend zur Verwendung des Forums, punktuelle Hilfe ist hier jederzeit möglich, also wenn Du beim Zeichnen, oder in Deinem Lisp irgendwo hängst und dann für diese Situation Hilfe brauchst == GERNE!Bitte aber ein Forum, in dem viele Ihre Zeit (kostenlos) zur Verfügung stellen, um Hilfestellung zu geben nicht mit kos ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Empfehlung eines CAD-Magazins
Brischke am 03.09.2004 um 08:55 Uhr (0)
Zitat: Original erstellt von fuchsi: also, wenn ich das magazin nicht über die firma beziehen würde, würde ich es nicht kaufen. das durchlesen, bis ich es für immer im rundordner verschwinden lassen, dauert meist nur ca. 15minuten. wen bitte interrersieren schon z.b.: seerosen für den gartenteich ? sehr selten interresante beiträge Fuchsi, so ziemlich alles ist subjektiv. Und Dein Beitrag birgt wenig konstruktives in sich. Ok, das ist deine Meinung, aber ein paar Vorschläge, was für Dich von In ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Konstruktionslinien versetzen von einer Linie in einem Block
Brischke am 20.10.2003 um 20:47 Uhr (0)
Hallo CAD-Tötti, ob ein Layer vorhanden ist kannst du mit (tblobjname..) prüfen. Siehe dazu dort: http://ww3.cad.de/foren/ubb/Forum145/HTML/000261.shtml Einen Layer erzeugen solltest du innerhalb eines Reactors mit (entmake ..) Das könnte dann so aussehen: Code: (entmake (if ( 14 (atoi(substr (getvar acadver ) 1 2)));AutoCAD-Version abfragen (list (0 . LAYER ) (100 . AcDbSymbolTableRecord ) (100 . AcDbLayerTableRecord ) (cons 2 ltbs_name);Name als String (70 . 0) (cons 62 ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Textinformation in Excel importieren
sero am 06.11.2006 um 18:23 Uhr (0)
Hallo,ich bin auf der Suche nach einem kleinen Tool, dass Text aus einer Zeichnung in ein "brauchbares" Excelformat exportiert. Ich habe schon mal so ein Tool gefunden, aber mit der Exceltabelle konnte ich wenig anfangen.Bei der Zeichnung handelt es sich um einen Pflanzplan; jede Pflanzflaeche erhaelt ein Label, dass ich ueber einen Leader (Pfeil & Text) erzeuge. Der Text sieht folgendemassen aus: "20 No RK" (=20 Stueck der Pflanze Rosa Kent). Diese Labels werden dann per Hand ausgelesen und zu einer Gesam ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : sssetfirst und Attribute
cadffm am 20.10.2011 um 11:50 Uhr (0)
Also OK, dann wollen wir mal sagen das es sich in Lisp 100% genau so verhalt wie auf ganz normalerAnwenderebene.Hat man die Attribute gewählt und gibt sie zB. der _Copy-Funktion zum Fraß, so wird Acad einemauc hdie Inserts kopieren und nicht die Attribute.. Und genau so verhalt sich der Auswahlsatz auch -im Auswahlsatz sind ebenfalls die übergeordneten Objekte (die Insert) enthalten !Das Besondere ist eben das sich AutoCADbei jedem Auswahlsatz auch genau merkt wie dieser erstellt wurde,Und in deinem Fall h ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Pfad der Plotstiltabelle via Lisp ändern!?
Erwin Fortelny am 18.11.2003 um 08:04 Uhr (0)
Hallo! Zitat: Original erstellt von CAD-Tötti: sei mir nicht böse, ... Brauchst keine Angst haben ... Zitat: Original erstellt von CAD-Tötti: ... aber bei 186 PC?-Dateien würde ich den Hebel ganz woanders ansetzen: [...] Tja, ich sage nur : der Kunde ist König! Und da wir sehr oft von Kunden die Grundriß-CAD-Pläne bekommen und auch oft dort hinein zeichnen müssen, müssen wir auch mit Deren Stiftzuordnung leben, dass bedingt schon mal pro Projekt mind. Eine, dann hat man ja auch noch of ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Punkte mit Linien verbinden
Dorfy am 13.02.2012 um 21:16 Uhr (0)
in deiner repeat schleife gehst du die Punkte durch und suchst dir den Text im näheren Umfeld(Fehlerbetrachtung iwan noch bedenken -- kein Text, mehr als ein Text...)somit hast du Punktnummer und Koordinaten -- die "kleine Liste" (punktnummer . (koordlist))(ich würde ihmo auf cons zurückgreifen... für die kl. Liste) diese kleinen Listen hängst du dann munter aneinander mittels cons oder append((punktnummer1 . (koordlist1))(punktnummer2 . (koordlist2))(punktnummer3 . (koordlist3))...(punktnummern . (koordli ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Laengsschnitte erstellen mit Lisp
m-troeger am 08.07.2004 um 18:56 Uhr (0)
Servus, Längsschnitte - dazu brauchts ein Programm zum Digitalisieren der Punkte im Lageplan (Punkte = Blöcke mit Attributen Punktnummer und Höhe, Blockname 3-stellig numerisch = Punktcode), wobei eine ASCII-Datei erstellt wird. Station Höhe Punktcode Bemerkung 78.712 398.110 410 W 190.896 413.970 210 W 742.917 427.530 410 W 753.628 428.130 410 W 753.903 428.020 410 W 777.501 429.350 410 W Dann ein Prog was mehrere Profile mischt und in ein spezielles Format bringt , z.B. Profil mit Rohrleitung und Gelände ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Protect your Lisp
Theodor Schoenwald am 05.02.2013 um 20:07 Uhr (0)
Hallo Dirk,Zeitbeschränkung?Wenn der Benutzer die Zeit an seinem PC zurückstellt (das habe ich schon öfters gesehen), nützt die Zeitbeschränkung nicht viel.Allerdings hat der Benutzer etwas Arbeit.Damit der Benutzer etwas mehr Arbeit hat, kannst Du die Zeit auch nach unten beschränken. Dann muss er erst herausfinden wie weit er seine Zeit am PC zurück stellen darf.Auf jeden Fall hat er mehr Mühe.Noch mehr Mühe bekommt er, wenn das Programm z.B. aus zwei Dateien besteht. Bei der einen ist die Zeitbeschänkun ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : 2009 Anzeigenreihenfolge
alfred neswadba am 26.05.2009 um 10:39 Uhr (0)
Hi,Du kannst ja das obige erweitern, zum einen den Layernamen hinzufügen und dann mehrfach mit unterschiedlichen Layernamen im Script/Menü/Lisp hintereinander setzen, z.B.: Zitat:(command "_draworder" (ssget "X" ((0 . "HATCH")(2 . "SOLID")(8 . "LAYER_A")) "" "_b")(command "_draworder" (ssget "X" ((0 . "HATCH")(2 . "SOLID")(8 . "LAYER_B")) "" "_b")...dann wird zuerst alle, was Schraffur vom Typ SOLID ist und auf Layer LAYER_A liegt ganz nach unten gesetztund dann gleiches mit Layer LAYER_B (als Ergebnis lie ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Buzzsaw, RedSpark, Point A, ... entfernen
Proxy am 02.02.2004 um 22:01 Uhr (0)
Ist mir so bei Surfen vorbeigeflogen und kann IMHO hier auch gepostet werden da durchaus praktisch und lehrreich. LISP Code: ;;; By Jimmy Bergmark ;;; Copyright (C) 1997-2003 JTB World, All Rights Reserved ;;; Website: www.jtbworld.com ;;; E-mail: info@jtbworld.com ;;; This program is created for AutoCAD 2002, AutoCAD 2004 and vertical products ;;; Removes the icons Buzzsaw, RedSpark, Point A and FTP in Open dialog box ;;; ;;; To remove all of the Icons above for all profiles use (remicons T T T T ...
|
| In das Form Rund um Autocad wechseln |
