0 Members and 1 Guest are viewing this topic.
(vla-put-ShadePlot newPViewport acShadePlotAsDisplayed)OkThank youFor the quality I will wait...
(setq lst (entget (cdadr (member (cons 3 (getvar "CTAB")) (dictsearch (namedobjdict) "ACAD_LAYOUT")))))(entmod (subst (cons 77 4) (assoc 77 lst) lst))
Code - Auto/Visual Lisp: [Select] (setq lo-lst (entget (cdadr (member (cons 3 (getvar "CTAB")) (dictsearch (namedobjdict) "ACAD_LAYOUT")))) ) ; SHADEPLOT mode : 0 = AS DISPLAYED (setq lo-lst (subst (cons 76 0) (assoc 76 lo-lst) lo-lst) ) ; QUALITY : 4 = MAXIMUM (setq lo-lst (subst (cons 77 4) (assoc 77 lo-lst) lo-lst) ) (entmod lo-lst)thanks to VovKa too !in any way I would like to know if it is possible to do the same (always in model space) with the vla-xxxx functions