|
Makro Programmierung : Setzen von 2D-Hilfslinien zur Positionierung von Bemassung in Annotation
Walter Geppert am 27.10.2004 um 14:25 Uhr (0)
So, um auch die ursprüngliche Frage zu beantworten Code: (in-package :custom) (use-package :OLI) (sd-defdialog dc4-anno-bemassen-hline-dialog :dialog-title Mass-Hilfslinien ;;:dialog-control :sequential :variables ( (kante :selection *sd-anno-geo-seltype* :prompt-text Bezugskante angeben :title Bezug :check-function # (lambda (elem) (let () (if (sd-am-line-struct-p (sd-am-inq-specific-geo-props elem)) ...
|
| In das Form Makro Programmierung wechseln |
|
Rund um Autocad : Erzeugen von 3D-Flächen mittels AutoLISP
Big M am 21.03.2003 um 12:28 Uhr (0)
@mapcar: Vorab vielen Dank für die schnelle und umfassende Antwort. Zu Frage a): Die Polylinien werden durch Meßmaschine (sowas gibt es wirklich) in wählbaren Abständen Bahn für Bahn von Muster abgenommen und von mir dann mittels Skript und Befehl IGESIN in die Zeichnung eingeladen. Zu Frage b): Die PL fangen alle ungefähr auf einer 3D-Ebene an, laufen als Kontur mit halbwegs gleichen Abständen zwischen den Kontrollpunkte um das Muster, enden dann nicht genau definiert. Wenn man wie von mir vorgeschlag ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Funktionen
Werner-Maahs.de am 07.09.2007 um 13:48 Uhr (0)
Zitat:Original erstellt von CadGeist:...2.) Ich suche nach einem Befehl, ... der Layer erstellt.Ich stelle mier das so vor, ich habe z.B eine Funktion 25, wenn ich auf den Button drücke, sucht es alle Layer ab , und sollte kein Layer 25 existieren, erstelle es diesen mier? Dies am besten gekoppelt mit der Funktion Linie!!...Sieht ja fast so aus, wie eins meiner über 150 Werkzeuge, die in meinen Kursen erstellt wurden. Gibt es aber nicht zu kaufen, sondern wurde direkt in Kursen als Anregung gemacht.Hier ...
|
| In das Form Rund um AutoCAD wechseln |
|
Autocad VBA : Attribute mit Excel abgleichen
Big Sven am 14.02.2006 um 15:56 Uhr (0)
Hallo Forum!Jetzt bin ich mit dem ersten Teil meines Ausfuges in die Welt von VBA fast fertig und habe nochmal ein paar Fragen. Erstmal meine Progammbeschreibung:Mein Programm soll aus einer bestehenden Exceldatenbank (Anlagenbeispiel) anhand einer Kabelnummer (Spalte 2) mit den Blöcken der aktuell geöffneten DWG vergleichen. Wenn diese übereinstimmt soll überprüft werden, ob sich der Eintrag in dieser Datei oder der dazugehörigen DWG stammt. Der Dateiname steht in Spalte 1. Stimmt diese nicht überein, so ...
|
| In das Form Autocad VBA wechseln |
 |
Rund um AutoCAD : Schwerpunkte für viele Polygone setzen oder Koorindatenliste
loneship am 17.08.2011 um 15:32 Uhr (15)
Hallo Henning,vielen Dank für Deine Unterstützung. Das hat mit 2D-Polylinien auch funktioniert.Jetzt habe ich aber festgestellt, dass alle Polygone (Baumkronen) als 3D-Polylinien gezeichnet sind und jeder der Stützpunkte eine andere Höhe hat (alle auf der unter dem jeweiligen Randpunkt der Baumkrone befindlichen Geländehöhe, die daher immer unterschiedlich ist). Ich habe zunächst in MAP 2010 mit MAPCLEAN die 3D-Polylinien in normale Polylinien konvertiert. Dann konnte ich Regions daraus bilden. Wenn ich ab ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : Mit Isolieren Gruppen nach der Reihe anzeigen
MARTINLE am 25.05.2016 um 06:10 Uhr (1)
Guten Morgen!Ich hab wieder mal ein Problem.Ich versuche mit Objekte isolieren und Objekte isolieren beenden sechs Gruppen die in der Zeichnung vorhanden sind nach der Reihe anzuzeigen.Wenn aber eine oder mehrere vorhandene Gruppen keine Objekte enthalten wird nach (command "unisolateobjects") die Meldung "Keine Objekte zum Aufheben der Isolierung verfügbar."angezeigt und ab dann funktioniert das isolieren nicht mehr. Kann mir da jemand weiterhelfen?Ideal wäre auch, wenn es wie bei alert eine Meldung ausge ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : 3d-Volumenkörper auf eine Z-Ebene legen
wronzky am 31.05.2005 um 15:10 Uhr (0)
Hallo Andreas! Wir hatten das Problem auch mal und diese Lisp-Routine ist dabei entstanden: Code: (defun get-bounding-box (ename / vlaname minb maxb) (vl-load-com) (setq vlaname (vlax-ename- vla-object ename)) (vla-GetBoundingBox vlaname minb maxb) (setq minb (vlax-safearray- list minb)) (setq maxb (vlax-safearray- list maxb)) (list minb maxb) ) (defun c:solid-move ( / auswahl z_neu ename z_min zaehler altosmode) (setq auswahl (ssget (list (cons 0 "3DSOLID")))) (if auswahl (progn ...
|
| In das Form Rund um Autocad wechseln |
|
Inventor : Fehler bei Erhebung Tragflächenprofil
jupa am 05.06.2017 um 21:47 Uhr (1)
Zitat:Original erstellt von Max Michalski:... da ich nicht wüßte wie das gehen soll mit einer DXF oder DWG Ich hatte ja auch geschrieben, " wenn die Koordinaten der den Konturverlauf definierenden Punkte bekannt sind, z.B. in Form einer ExcelTabelle" [ok, war bißchen anders formuliert]. Ich habs oben auch mal schnell praktiziert: Da mir diese Koordinaten nicht vorliegen, habe ich das Profil (DXF) in AutoCAD eingelesen und mit einer kleinen LISP-Routine die Koordinaten der Polylinienstützpunkte nach Excel e ...
|
| In das Form Inventor wechseln |
|
Autocad VBA : lisp oder VBA
mapcar am 15.04.2004 um 15:12 Uhr (0)
Noch ein Nachtrag: Mit C++ ist das ja alles auch noch komplizierter, als es auf den ersten Blick aussieht. Es gibt da nämlich zum einen das alte C++ (mit dem auf die bisherigen und noch aktuellen ObjectARX-Funktionsbibliotheken zugegriffen wird), und dann das sog. Managed C++ , das mit der .NET-Klassenbibliothek (und auch den Wrapperklassen von Acad) arbeitet. Unmanaged C++ ist das alte C++, das es auch schon in VS 6 gab, während Managed C++, VB7 und C# die drei Sprachen sind, die in die Intermediate Lang ...
|
| In das Form Autocad VBA wechseln |
|
Rund um AutoCAD : Zuordnen von Layern zu Obkjekten / Befehlen
cadffm am 13.02.2025 um 15:58 Uhr (15)
Eine Vorlage .dwt hat ja nichts mit neuen Objekten zutun, nur mit den darin bereits vorhandenen Objekten.Natürlich sollte man eine Vorlage benutzen in welcher bereits ein paar vollständige Layouts enthalten sind,oder man hat "Befehle" welche nach Wunsch mit einem Klick die entsprechend vorbereiteten Layouts importieren.", das hat er anders gemacht,"Nicht mit einem MenuMakro, nicht mit der Werkzeugpalette.OkayWIE er es gemacht hat, könntest allerhöchstens du harausfinden, niemand sonst." mit ziemlicher Sich ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Achse und Lisp
Bruno_2 am 04.01.2005 um 13:08 Uhr (0)
Da ich neu im Forum bin kann meine Frage unpreziöser sein. Ich will ein Code schreiben das er beim verschiedenen (Grundrissen) die Achsen zeichnet. Original von CADmium (defun C:PLBOX-Multi (/ AUSWAHL INDEX ELEM XYMIN XYMAX MINX MAXX MINY MAXY DATA A) (vl-load-com) (if(and(or (and (setq AUSWAHL (ssget I )) ( (sslength AUSWAHL) 0)) (and (setq AUSWAHL (ssget)) ( (sslength AUSWAHL) 0)) ) (or(setq A (getreal
Randabstand 0 : )) (setq A 0.0) ) ) ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 07.09.2012 um 14:40 Uhr (0)
Hallo zusammen,erstmal danke für die Hilfe.Nun aber das nächste Problem.Ich habe die Routine in die Routine von CADwiesel eingefügt, aber sie läuft nicht richtig. Hier die geänderte Routine:; Lisp-Programm zum Absetzen eines Textes für %o-Angabe(defun c rozenthoehe ( / ech sli li proz sel el diff L P1 P2 X1 X2 Y1 Y2 Z1 Z2 S) (setq ech (getvar "CMDECHO")) (setvar "CMDECHO" 0) (princ "") (princ "Angabe über %-Neigung einer Linie") (princ "Wert durch Ersetzen eines vorhandenen Textes absetzen") (princ "von tg ...
|
| In das Form Lisp wechseln |
 |
Lisp : Informationen aus einer TTF-Schrift auslesen
Bernd10 am 12.12.2018 um 15:03 Uhr (1)
Hallo cadffm,Zitat:Original erstellt von cadffm:Du solltest einfach noch mal "ganz frisch" testen.Rechnerneustart, falls nach Schriftart-Installatioon noch nicht geschehen. Wir wollen doch allen unnötigen Ärger vermeiden.Acadneustart, hat sich erledigt falls der Rechner neu gestartet wurde :-)Eine DWG neu erstellen, ohne Vorlage (damit sind Fehler in der Vorlage ausgeschlossen - nur so kann ICH 100% sicher sein was bei dir vorgeht)Textstil anlegen, die Schriftart zuordnen, Schriftstil Normal.Neu abfragen p ...
|
| In das Form Lisp wechseln |
