|
CoCreate Programmierung : dropdown-Menü
Walter Geppert am 27.10.2009 um 14:03 Uhr (0)
Zitat:Original erstellt von RobCraven:1. du hast die Auswahl in strings umgewandelt, aber warum geht das nicht mit symbol bzw. keyword warum brauch ich den string (um sie überhaupt mit einem Befehl aufrufen zu können (sd-string=))?Man hätte auch SYBOLs mit eql vergleichen können, aber da die Variable Kunde ja wohl Firmennamen enthalten wird, ist mit ein STRING plausibler erschienen Zitat:2. du hast das modify_default_setting in ein sd-call-cmds gesetzt, warum? Ich habe ja den Befehl mit dem recorder aufge ...
|
| In das Form CoCreate Programmierung wechseln |
|
Lisp : Hilfe bei lisp! Block Attrtibute rotation und position!
cadplayer am 19.02.2013 um 10:29 Uhr (0)
Danke Jörn, deine zwei Funktionen liefern mir einmal die Koordinatenunterschiede zw BlockPkt und AttribPkt und dann den Winkel.Ein bissel schwierig ist das nächste Problem auf das meine Frage galt, wenn die Blöcke gedreht sind können im (ich betone im Objekt UCS) die Koordinatenunterschiede und Winkel gleich sein. Also sollte die übertragung der AttribPosition auf die Zielblöcke gleich ausfallen. Tut es bei mir aber nicht.Ich weiss nur nicht wie ich das einbauen kann. Frage: Wie bekommt man die Koordinaten ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Einsatz
Brischke am 13.08.2004 um 11:17 Uhr (0)
Hallo Petra, Ergänzend zu CADmiums Posting: Code: (defun c:PIA (/ dwgpath dwg2path dwgverz) (setq dwgverz (cdr (reverse (f:str-teilen (setq dwgpath (getvar DWGPREFIX )) ) ) ) dwg2path (apply strcat (mapcar (lambda (S) (strcat S ) ) (reverse (if ( (length dwgverz) 2) (list (car dwgverz) (cadr dwgverz)) dwgverz ) ) ) ) ) (alert (strcat Ganzes Verzeichnis: dwgpath
letzen 2 Verzeichnisse: dwg2 ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Ebenenproblem
Rehne am 09.03.2005 um 21:15 Uhr (0)
Muss Roland bepflichten. Eine Kleinigkeit stört mich auch noch. Wenn man Attribute als Höhenwerte nimmt, verwendet dieses Programm die Einsetzpunkte der Attribute und nicht des dazugehörigen Blocks, finde ich auch nicht so gut. Aber trotzdem, alles in allem nicht schlecht. Wir setzen als Aufsatz für AutoCAd das BB-Modul (Breining) ein. Dieses benutzt für vermessungspunkte ein bestimmtes format (Anhang). Es enthält eine Punktnr., Punktcode, Höhe, x- und y-Wert als Attribute, die nicht sichtbar sind. D.h. ...
|
| In das Form Rund um Autocad wechseln |
|
CoCreate Modeling : Lösung zum Thema Blechzuschnitt - Exportieren aus Annotation (MI DXF DWG IGES)
Klaus Lörincz am 19.08.2003 um 11:09 Uhr (0)
Blech.zip Hallo zusammen,Jetzt gibt es einen Entwurf für ein Exportieren von Abwicklungen aus Annotation. Im Zip-Paket findet Ihr:-------------------------------------------------------1 x sco_flatexp.dll für WIN1 x sco_flatexp.so für UX1 x docu (Ordner)-------------------------------------------------------Die Kompilate sind für OSD-M ab Version 11.5X bis 11.6XIm Ordner "docu" findet Ihr die HTML Seite "start.html".In diser Datei findet man auch die Information für die Installation und Konfiguration des ...
|
| In das Form CoCreate Modeling wechseln |
|
CoCreate Modeling : Lösung zum Thema Blechzuschnitt - Exportieren aus Annotation (MI DXF DWG IGES)
Klaus Lörincz am 19.08.2003 um 11:09 Uhr (0)
Blech.zip Hallo zusammen,Jetzt gibt es einen Entwurf für ein Exportieren von Abwicklungen aus Annotation. Im Zip-Paket findet Ihr:-------------------------------------------------------1 x sco_flatexp.dll für WIN1 x sco_flatexp.so für UX1 x docu (Ordner)-------------------------------------------------------Die Kompilate sind für OSD-M ab Version 11.5X bis 11.6XIm Ordner "docu" findet Ihr die HTML Seite "start.html".In diser Datei findet man auch die Information für die Installation und Konfiguration des ...
|
| In das Form CoCreate Modeling wechseln |
|
Rund um AutoCAD : CUI Befehlsaufrufe
cadffm am 22.02.2022 um 12:28 Uhr (1)
Der Rechtsklick (hoffentlich der Zeitabhängige, sonst verzichtest du ja auf Kontextmenüs?)wiederholt den letzten Befehl, nicht das letzte Menümakro - das solltest du bei der Rechercheöfters gelesen haben.Wenn ich dich recht verstehe, dann versuchst du diese Limitierung wie folgt zu umgehen:Eine oder diverse VBA-Funktionen schauen nach dem Aufruf nach was in USERS1 stehtund agieren entsprechend dem dort hinterlegten wert.Richtig?Eigentlich eine ganz nette Idee, klingt ein wenig nach LT-USer, die müssen sich ...
|
| In das Form Rund um AutoCAD wechseln |
|
PTC Creo Elements/Direct Modeling : Flächenteile reparieren - Makro - Hilfe benötigt
Seele am 28.07.2016 um 14:22 Uhr (8)
Hallo, da es bei mir häufiger vorkommt, das ich Teile/Flächenteile reparieren muss, habe ich den Versuch gestartetmit diesem Makro die Anzahl der Klicks zu reduzieren. Sehr oft müssen Kanten verschnitten werden, und jetzt kannich diese eine nach der anderen anklicken, ohne dauernd den Befehl neu starten zu müssen.Das funktioniert auch schon und hat mir schon viel Zeit erspart!Dann dachte ich mir, das ich die anderen Befehle die ich sonst noch Brauche mit in dieses Makro integriere, damit ich nicht dauernd ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
Lisp : Funktion Zylinderkanten Abrunden
cadffm am 15.06.2016 um 10:38 Uhr (1)
Deine Zeilen (aus dem Netz - sowas lasse ich nicht gelten, es ist dein Copy&Paste-Werk ) solltest du neben einem leeren Blatt Papier legen (Notepad.exe ),dann das ganze noch mal NEU erstellen.Command zum erstellen der Zylinder nicht alle "sauber", Command zu Filletrad nicht sauber,merkwürdige Initget-Anweisungen und mehrfach unnötiges speichern des letzten "Osmode"-Wertes,bis hin zu deinem eigentlichen Grund des Themenstarts..Dein erster Abrunden-Vorgang soll wohl gggganz die obere Fläche des obersten Zy ...
|
| In das Form Lisp wechseln |
|
CoCreate Modeling : Importieren von CSV-Daten mittels SolidGenius V18.10 (64-Bit)
montharon am 21.03.2014 um 08:53 Uhr (1)
Guten Morgen Sinan, also ich versuche hier genau zu beschreiben wie ich vorgegangen bin und kannden Fehler auch beliebig oft reproduzieren.(01) Starten von Modeling 18.1(02) Datei - Öffnen - LISP Code - start_sg.lsp(03) Anwendungen - Basis - SolidGenius wird angezeigt(04) Basismodul aktivieren (SolidGenius) gibt mir natürlich einen Fehler zurück, da ich keine Lizenz habe und nur die Free-Version verwenden möchte Fehler: Keine Lizenz erhhältlich Aktivierung des Moduls "SolidGenius" gescheitert. Akti ...
|
| In das Form CoCreate Modeling wechseln |
|
AutoLisp : BKS - Geometrie - AutoLisp
cadffm am 07.01.2003 um 11:36 Uhr (0)
Tach´chen - @ALL [cross-posting / spotlight] Meine 2 Lernstunde hat begonnen, nur der Lehrer fehlt aber ihr könnt helfen (100%ig) : Ich lasse also eine Geometrie (lwpoly´s) erzeugen. Die ganzen Koordinaten werden aus 2 Punkten (getpoint) errechnet. Das ganze funtioniert sogar (oh Wunder) im WKS. Aufgabenstellung: Ich muß eine 2.Variante erzeugen können, und zwar soll die Geometrie auch 90° gedreht erzeugt werden können- nun habe ich überlegt wie es am besten zu lösen ist. Version A: Eine 2.Be ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Drehe Block und verschiebe Attribut
spider_dd am 27.06.2012 um 16:55 Uhr (0)
Zitat:Original erstellt von cadplayer:Es kam aber zu einem guten Nebeneffekt, dass ich den Block am Bildschirm drehen kann und er solange gedreht wird bis ich einen Punkt anklicke. Vorher warst Du aber mit einem Fehler aus dem Lisp-Prog rausgeflogen. Zumindest bei mir kommt eine entsprechende Fehlermelung.Code:Befehl: RBSelect block! _ucsAktueller BKS-Name: *WELT*Ursprung des neuen BKS angeben oder [FLäche/bENannt/Objekt/VOrher/ANsicht/Welt/X/Y/Z/ZAchse] Welt: _objectObjekt für BKS-Ausrichtung wählen:Befeh ...
|
| In das Form Lisp wechseln |
|
Lisp : layer invertieren
CADmium am 21.03.2007 um 22:14 Uhr (0)
Eine gute Einführung bietet das demnächst auch hoffentlich als Buch erscheinende Tutorial von Mapcar und ein Lisp-Handbuch für R14 ... nicht zu vergessen die Onlinehilfe (aber da muß man ja erst wissen wonach man sucht .Wenn du im englischen Fit bist kann ich noch AFRALISP empfehlen.Aber noch mal zu deinem Bsp:(defun c:swi (/ lay layli) ... lay layli sind lokale Variablen (while (setq lay (tblnext "LAYER" (not lay))) ...solange mit der Funktion tblnext noch ein Layer in der Layertabelle gefunden wird, spe ...
|
| In das Form Lisp wechseln |
