|
Lisp : Plotten von Modell oder Layout
Ralf-CAD-Support am 24.07.2008 um 13:11 Uhr (1)
funkt super Vielen Dank !
|
| In das Form Lisp wechseln |
|
AutoLisp : Layout Regenerieren
Zec am 06.10.2005 um 09:14 Uhr (0)
hallo,bin auf der suche nach einem tool das alle Layoutfenster regeneriertmfgZEC
|
| In das Form AutoLisp wechseln |
|
Lisp : renameblock.lsp
stolti am 05.06.2008 um 21:17 Uhr (0)
hallo leute.ich hab hier von herrn cadmium freundlicherweise eine tolle lisp bekommen.(defun C:LAYOUTRENAME (/ ITEM LAYOUTLISTE) (vl-load-com) (setq NAME (cadr(fnsplitl(getvar"dwgname")))) (vlax-for item(vla-get-layouts (vla-get-activedocument(vlax-get-acad-object)) ) (setq LAYOUTLISTE(cons(list ITEM (vla-get-name ITEM) (vla-get-taborder ITEM) ) LAYOUTLISTE ) ) ) (setq NR 0) (foreach LAYOUT (cdr(vl-sort LAYOUTLISTE (lambda(X1 ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Stempelattribute
CADmium am 18.02.2005 um 12:32 Uhr (0)
Zitat: Original erstellt von MaxWachtl: ich suche .. Könnt Ihr mir da weiterhelfen ? Ja sicher : zum Suchen versuchs mal mit www.google.de .. wo hast du eigentlich schon geguckt, ob du was findest ?? Im Ernst: klar ist sowas per Lisp lösbar: Das Papierformat des Layouts liefert dir z.B. folgende Funktion: (defun LAYOUT-GET-PAPERSIZE ( / WIDTH HEIGHT) (vla-GetPaperSize (vla-get-activelayout (vla-get-activeDOCUMENT (vlax-get-acad-object) ) ) WIDTH HEIGHT ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Blattrahmen erstellen im Layout
cadffm am 09.08.2003 um 22:18 Uhr (0)
richtiges Forum ? ------------------ Gruß Sebastian Der Feind des Guten ist das Bessere.
|
| In das Form AutoLisp wechseln |
|
Lisp : Plotstildatei
RoSiNiNo am 12.09.2003 um 10:14 Uhr (1)
zu 1. Natürlich geht das, mach ich die ganze Zeit.Du mußt nur in der Plotstiltabelle "Objektlinienstärke verwenden" angeben.zu 2. wir haben ca. 20 verschiedene Farben, jede Farbe hat 6 Schattierungsstufen und 11 Strichstärken. Also auch kein Problemzu 3. Marum keine festgelegten Plotstiltabellen? Wenn neue Farben dazukommen, dann muß halt die felstgelegte Plotstiltabelle erweitert werden. Linienstärken siehe Punt 1.zu 4. siehe Punkt 35. Das ist nicht dein Problem"halbe Linienstärke" -- wenn du mit Layout a ...
|
| In das Form Lisp wechseln |
|
Lisp : Layouts auslesen
andi2050 am 29.07.2006 um 15:16 Uhr (0)
HiMittels ActiveX müsste es klappen (Eigenschaft ConfigName ändern):Code:;;;----------------------------------------------------;;; Setzt ConfigName von allen Layouts auf newname;;;----------------------------------------------------(defun layouts ut-configname (newname /) (vlax-for layout (vla-get-layouts (vla-get-activedocument (vlax-get-acad-object))) (vla-put-configname layout newname) ))Mit folgender Funktion kannst Du Dir die weiteren Eigenschaften/Methoden des aktiven Layouts angucken:Code:;;;----- ...
|
| In das Form Lisp wechseln |
|
Lisp : renameblock.lsp
wronzky am 05.06.2008 um 23:34 Uhr (0)
hm...Sieht Dein code denn jetzt so aus:Code:(defun C:LAYOUTRENAME (/ ITEM LAYOUTLISTE) (vl-load-com) (setq NAME (cadr(fnsplitl(getvar"dwgname")))) (vlax-for item(vla-get-layouts (vla-get-activedocument(vlax-get-acad-object)) ) (setq LAYOUTLISTE(cons(list ITEM (vla-get-name ITEM) (vla-get-taborder ITEM) ) LAYOUTLISTE ) ) ) (setq NR 97) (foreach LAYOUT (cdr(vl-sort LAYOUTLISTE (lambda(X1 X2)((caddr X1) (caddr X2))))) (if(not(vl ...
|
| In das Form Lisp wechseln |
|
Lisp : Markierte Layout-Registerkarten
Meldin am 26.01.2017 um 14:00 Uhr (1)
Aaaa tipfehler Achtung "GefelterteLAYLIST" in "GefilterteLAYLIST" ändern!------------------Gruß Wolfgang
|
| In das Form Lisp wechseln |
|
AutoLisp : Layout-Registernamen umbennen
WolfgangGutke am 07.10.2004 um 15:18 Uhr (0)
Hallo, wie kann man via LISP den Namen eines Registers umbenennen ? VG Wolfgang
|
| In das Form AutoLisp wechseln |
|
Lisp : Automatisierung
Stefan-Schirge am 27.10.2020 um 11:25 Uhr (1)
Ich auch, allerdings find ich es im Layout eigentlich nicht so wichtig. ------------------AutoCad 2018
|
| In das Form Lisp wechseln |
|
Lisp : Registerkarten für Modell und Layout einblenden/ausblenden
Bernhard GSD am 26.11.2012 um 19:23 Uhr (0)
Hallo!Herzlichen Dank für die schnelle Hilfe! ------------------Gruß aus WienBernhard
|
| In das Form Lisp wechseln |
 |
Lisp : Ignoriere alles außer...
cadffm am 11.12.2018 um 12:38 Uhr (15)
Danke für die Erklärung mit dem "ersten Layout aktuell setzen", das hatte ich nicht auf dem Schirm, jetzt verstehe ich es.Und nun sehe ich auch "dein Problem", uff.Ich habe dir gezeigt wie man die WENN,DANN Geschichte umsetzen kann:Code:(if (wcmatch (strcase LayoutName) "E_*,SM_*") (progn (setvar "CTAB" LayoutName) (alert "DoMyLayoutStuff") ))Dies hast du bei dir eingebaut:Code:(foreach Layout (layoutlist)(setvar "ctab" layout) (setq Lay12 (strcat(substr (getvar "ctab") 1 2) "*")) ...
|
| In das Form Lisp wechseln |
