Zitat:
Original erstellt von Lemsi:
(Ich will eine Layerdatei laden und dann bei den ganzen Layern Farbe, Plot,und Linientyp laden, die ganzen Befehle gehen aber leider nicht in den Langstring editor hinein)
Das hört sich nach EINIGEN Layern an. Da würde ich anders vorgehen. Guck DIr doch mal die Acad-Hilfe zum Thema:
Zitat:
Überblick über CAD-Standards
an. Das wäre mit Bordmitteln wahrscheinlich die einfachste Variante für Dich.
Oder Du könntest auch über die Import/Export Funktion des Layerstatus-Manager gehen (ab R2005? integriert im Layermanager)
Oder Du verwendest hierfür den Express-Tools Layermanager.
Oder Du proggst Dir was mit Lisp.
Ich habe meine Layerdef's nur noch in externen Ascii-Dateien in Listenformat liegen.
Dann hab' ich mir 'ne Funktion geschrieben die diese externen Layer entsprechend anlegt/einstellt.
Die Funktion rufe ich dann einfach nur noch mit dem Dateinamen als Parameter auf und fertig ist der Lack.
Aufruf an der Kommandozeile oder auch aus 'nem Buttonmakro heraus wäre dann z.B.:
Code:
(machmirdielayer (findfile "meinetollenlayer.txt"))
Die Dateistruktur orientiert sich bei mir an den Properties wie sie in ActiveX verwendet werden und sieht so aus:
(Problematisch beim Proggen sind nur die Eigenschaften: TrueColor, Plotstylename und Linetype weil die teilweise von externen Dateien abhängen, wenn man die wegläßt ist's sogar relativ einfach zu proggen)
Code:
(setq LST-LAYERS
(quote (((NAME . "0")
(DESCRIPTION . "")
(COLOR . 254)
(FREEZE . :vlax-false)
(LAYERON . :vlax-true)
(LINETYPE . "Continuous")
(LINEWEIGHT . -3)
(LOCK . :vlax-false)
(PLOTSTYLENAME . "100%Schwarz")
(PLOTTABLE . :vlax-true)
(TRUECOLOR (252 194 254))
)
((NAME . "DEFPOINTS")
(DESCRIPTION . "")
(COLOR . 7)
(FREEZE . :vlax-false)
(LAYERON . :vlax-true)
(LINETYPE . "Continuous")
(LINEWEIGHT . 0)
(LOCK . :vlax-false)
(PLOTSTYLENAME . "Normal")
(PLOTTABLE . :vlax-false)
(TRUECOLOR 7)
)
((NAME . "UEBERSICHT")
(DESCRIPTION . "")
(COLOR . 9)
(FREEZE . :vlax-false)
(LAYERON . :vlax-true)
(LINETYPE . "Continuous")
(LINEWEIGHT . 35)
(LOCK . :vlax-false)
(PLOTSTYLENAME . "100%Schwarz")
(PLOTTABLE . :vlax-false)
(TRUECOLOR 9)
)
)
)
)
...------------------
Ciao,
Marc
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP