---

Hallo,

in einem Ansichtsfenster lass ich ein kleines lisp laufen, dass mir automatisch die Farben der Layer einstellt.
Nach jedem abgearbeiteten Layer wird das Ansichtsfenster regeneriert, was ich zwecks Geschwindigkeit gerne unterdrücken würde.

REGENAUTO = Aus
REGENMODE = 0

Weiß da jemand Rat ?

------------------
MfG
Frank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich vermute du benutzt dafür einen AutoCAD-Befehl anstatt es selbst am AF zu ändern über Programmierung?
Ansonsten: Code posten..

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

(defun farbe_umwandeln_viewport (/)
    (princ "\nFENSTER")
    (setvar "regenmode" 0)
      (while layern
(princ "\nLayer: ")
(princ (substr (cdr (nth 1 layern)) 1 (vl-string-search "_M-" (cdr (nth 1 layern)))))
(if (not (wcmatch (cdr (nth 1 layern)) "*Solid*"))
(progn
(setq nlayerdat nil)
(if (setq nlayerdat (fc_layer_searchin_standardlist (substr (cdr (nth 1 layern)) 1 (vl-string-search "_M-" (cdr (nth 1 layern)))) daten))
  (progn
    (command "_vplayer" "farbe" (nth mspalte nlayerdat) (cdr (nth 1 layern)) "aktuell" "")
    (princ ".....Neue Farbe: ")
    (princ (nth mspalte nlayerdat))
    );progn
  (princ ".....nicht gefunden !")
  );if

);progn
(princ "..... ignoriert !")
  );if
(setq layern (tblnext "layer"))
);while   
    )

------------------
MfG
Frank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Sorry, in  2004 gibt es noch keine Ansichtsfensterüberschreibe(Farbe),
dann auch nichts regeneriert werden (die Farbumstellung eines Layers verursacht keine neuberechnung der Geometriedarstellung,
weder mit noch ohne Regenauto.

Oder geht es doch nicht um 2004? und doch um eine AF-Farbüberschreibung(2016)?

[edit]
Aber auch da, soeben getestet: Über den Befehl AFLAYER ganz normal über die Befehlszeile die
Farbe überschrieben => es erfolgt keine Regenerierung.
Mein Fehler, hatte in einem AF einen sehr niedrigen Auflösefaktor drin 
[editend]

 

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

habe ich noch gar nicht geändert, habe acad2015

bei mir wird immer regenriert

------------------
MfG
Frank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

jaa, Problem(+) und IST-Beschreibungen(-) sind schwierig, i know.

Also geht es dir nun um eine Ansichtsfensterüberschreibung, oder nicht?

Nutzt du nun den AutoCAD-Befehl, oder nicht?
(der AutoCAD-Befehl hat nun mal eine REGEN-Anweisung mit drin)

Umgehen: eigene Programmierung..
Zum Beispiel dort siehst du wo die Daten gespeichert werden: Klick.

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ohne das ich noch mal nachsehe:
Der Regen sollte erst am Ende des Acadbefehls kommen, oder nicht?
Dann kannst du doch erst alle Layer einstellen und den Befehl beenden,
Das wäre ein Regen pro AF.

Oder stört schon dieses eine Regen weil du 64 AF * 100 Layouts durchhechelst?

Wie gesagt, die Aussage mit Regen erst am Ende habe ich jetzt nicht kontrolliert, ist geraten 

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

stimmt, es geht um die ansichtsfensterüberschreibung

die ist für mich am einfachsten mit dem befehl "aflayer" zu bewerkstelligen

------------------
MfG
Frank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Dann machst du "den Fehler" für jeden Layer einzeln den Befehl aufzurufen anstatt für ein Ansichtsfenster
alle Einstellungen in einem Rutsch zu setzen und den Befehl dann erst zu verlassen.

Oder geht es dir doch um dieses eine Regen pro Ansichtsfenster (64 AF * 100 Layouts = 6400*regenerieren ;D )
Wenn es um dieses eine Regen geht, dann hilft nur die AF-Einstellung selbst zu ändern anstatt über den AutoCAD-Befehl.
(wobei es dann auch um versch.Farben pro AF gehen muss, denn man kann ja auch alle AF gleichzeitig einstellen)

Bist etwas schüchtern mit deinen Infos - das nötigt zum oft und unnötig viel schreiben  

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

aber ich muss ja für jeden layer den befehl aufrufen, da die farben ja unterschiedlich sind

(command "_vplayer" "farbe" (nth mspalte nlayerdat) (cdr (nth 1 layern)) "aktuell" "")

------------------
MfG
Frank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Du kannst so lange in dem Befehl verweilen wie du lustig bist?
Lasse doch mal die Klammern weg und benutze Befehlszeile und Tastatur.

AFLAYER
FARBE
5
MeinLayernamenMuster_[1-3]
AKTUELL (wenn es nur in diesem einen AF so angelegt werden soll)

JETZT habe ich den Layern "MeinLayernamenMuster_1" "MeinLayernamenMuster_2" "MeinLayernamenMuster_3"
die Farbe 5 zugeordnet und bin noch immer im AFLAYER-Befehl, oder nicht?
also weiter:

FARBE
21
TESTLAYER,HILFSLAYER
AKTUELL

JETZT habe ich diesen beiden Layern die Farbe21 zugeordnet und bin noch immer im Befehl, also weiter..

Und am Schluß bestätige ich wie gewohnt mit einer Leereingabe "" und beende den Befehl auf diese Weise wie man es auch per Hand machen würde.

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hier als Beispiel,
wobei man im Programm dann vielleicht mit der Internationalen Schreibweise der Befehle und Optionen arbeiten sollte,
hier mal nur für das deutsche "Sprachpaket":

ein Farbvariante

Code:

---

(command "AFLAYER" ;Befehl starten
(foreach LI '(("*P*,*A*" . 1)("*[24]*" . 3)("*E*" . 6)); Liste (NAMENMUSTER . FARBE)
(command "FARBE" (cdr LI) (car LI) "AKTUELL") ;Optionen und Werte eingeben
); Befehl beenden
)

---

eine andere Farbvariante

Code:

---

(command "AFLAYER" ;Befehl starten
(foreach LI '(("*P*,*A*" . 5)("*[24]*" . 40)("*E*" . 211)); Liste (NAMENMUSTER . FARBE)
(command "FARBE" (cdr LI) (car LI) "AKTUELL") ;Optionen und Werte eingeben
); Befehl beenden
)

---

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

der letzte tipp war gold wert, es klappt !!

besten dank und schönes wochenende

------------------
MfG
Frank

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP