DISPLAY PLOT STYLES (Opgelost)

[Indo_Jim]

Hallo allemaal

Kan iemand mij vertellen hoe ik deze kan aan of uit kan zetten. (DISPLAY PLOT STYLES)
Het zit in Page setup manager/ Modify /Plot style table je kunt het hier dan aan of uit vinken.

Vraag is nu kan ik dat ook buiten page setup manager aan of uit zetten.
Net als sommige setvar kan je door 1 of 0 te zetten aan of uit zetten.

Kan het dus nergens vinden moet nu dus via de page setup manager.

[hulpje]

Zover ik kan zien, is daar idd geen commando voor.
Daarom zou ik het volgende doen:

Maak een *.dwt bestand aan, die je als opstart tekening gebruikt.
In deze opstart tekening maak je dan een goede Pagesetup aan.

Stel AutoCAD in, dat hij begint met jouw eigen opstart tekening.

Ik hoop dat dit je wat verder helpt.

Richard

[HofCAD]

Hallo allemaal

Kan iemand mij vertellen hoe ik deze kan aan of uit kan zetten. (DISPLAY PLOT STYLES)
Het zit in Page setup manager/ Modify /Plot style table je kunt het hier dan aan of uit vinken.

Vraag is nu kan ik dat ook buiten page setup manager aan of uit zetten.
Net als sommige setvar kan je door 1 of 0 te zetten aan of uit zetten.

Kan het dus nergens vinden moet nu dus via de page setup manager.

Beste Indo_Jim,

Bedoel je zoiets als onderstaande toggle:

Code Selecteer Uitklappen

(defun c:spstog(/ alayout)
(vl-load-com)
(setq alayout (vla-get-activelayout (vla-get-activedocument (vlax-get-acad-object))))
(if (= (vla-get-ShowPlotStyles alayout) :vlax-true)
(vla-put-ShowPlotStyles alayout :vlax-false)(vla-put-ShowPlotStyles alayout :vlax-true))
(vlax-release-object alayout)
(command "_.REGENALL")
)

Met vriendelijke groet,
HofCAD CSI

PS Let op (command "_.REGENALL") toegevoegd.

[HofCAD]

Het werkt bedankt weet alleen niet precies wat het doet.
Kan alleen niet zien of die uit of aangezet is.

Beste Indo_Jim,

Bedoel je dat je een melding wil zien?

Code Selecteer Uitklappen

(defun c:spstog(/ alayout msg)
(setq alayout (vla-get-activelayout (vla-get-activedocument (vlax-get-acad-object))))
(if (= (vla-get-ShowPlotStyles alayout) :vlax-true)
(progn (vla-put-ShowPlotStyles alayout :vlax-false)
(setq msg "\nDisplay plot styles staat uit"))
(progn (vla-put-ShowPlotStyles alayout :vlax-true)
(setq msg "\nDisplay plot styles staat aan")))
(command "_.REGENALL")
(vlax-release-object alayout)
(princ msg)(princ)
)

of

Code Selecteer Uitklappen

(defun c:spstog2(/ alayout msg)
(setq alayout (vla-get-activelayout (vla-get-activedocument (vlax-get-acad-object))))
(if (= (vla-get-ShowPlotStyles alayout) :vlax-true)
(progn (vla-put-ShowPlotStyles alayout :vlax-false)
(setq msg "\nDisplay plot styles staat uit"))
(progn (vla-put-ShowPlotStyles alayout :vlax-true)
(setq msg "\nDisplay plot styles staat aan")))
(command "_.REGENALL")
(vlax-release-object alayout)
(alert msg)
(princ)
)

of

Code Selecteer Uitklappen

(defun c:spstog3(/ alayout app0)
(setq app0 (vlax-get-acad-object))
(setq alayout (vla-get-activelayout (vla-get-activedocument app0)))
(if (= (vla-get-ShowPlotStyles alayout) :vlax-true)
(progn (vla-put-ShowPlotStyles alayout :vlax-false)
(vla-eval app0 (strcat "MsgBox \"Display plot style staat uit\"" ", "
"vbInformation" ", " "\"HofCAD CSI\"")))
(progn (vla-put-ShowPlotStyles alayout :vlax-true)
(vla-eval app0 (strcat "MsgBox \"Display plot style staat aan\"" ", "
"vbInformation" ", " "\"HofCAD CSI\""))))
(command "_.REGENALL")
(vlax-release-object alayout)
(vlax-release-object app0)
(princ)
)

of

Code Selecteer Uitklappen

(defun c:spstog4(/ alayout app0)
(setq app0 (vlax-get-acad-object))
(setq alayout (vla-get-activelayout (vla-get-activedocument app0)))
(if (= (vla-get-ShowPlotStyles alayout) :vlax-true)
(progn (vla-put-ShowPlotStyles alayout :vlax-false)
(vla-eval app0 (strcat "MsgBox \"Display plot style staat uit\"" ", "
"vbExclamation" ", " "\"HofCAD CSI\"")))
(progn (vla-put-ShowPlotStyles alayout :vlax-true)
(vla-eval app0 (strcat "MsgBox \"Display plot style staat aan\"" ", "
"vbExclamation" ", " "\"HofCAD CSI\""))))
(command "_.REGENALL")
(vlax-release-object alayout)
(vlax-release-object app0)
(princ)
)

Of zit er tussen de weergave nauwelijks verschil?
Zet dan bijv. de plotstyle op monochrome.ctb

Met vriendelijke groet,
HofCAD CSI

PS spstog3 en spstog4 toegevoegd

[Indo_Jim]

HofCAD

Namens het gehele indische volk bedankt.
Dat moest/wilde ik hebben.