How to Detect Visual Style

[BeKirra]

For example, if the visual style is wireframe in the current drawing.
How to detect it by autolisp?
Your helps are much appreciated.

[BeKirra]

The reason which I rose was that I cannot see any system variables to do the job.
I'd like to know if there is any solution for this.

[ccowgill]

I have not been able to find any system variables either. Is there a way to list environmental variables? perhaps it is one of those (similar to tool palette paths)

[BeKirra]

I have not been able to find any system variables either. Is there a way to list environmental variables? perhaps it is one of those (similar to tool palette paths)

I did a search but could not find the EV list.
Thanks.
Perhaps we need a new system variable next version.

[pbejse]

Same problem i had when i was looking for the last distance used in offset command
anyhoo...

by extracting several system variables for every Standard Visual Style (out of the box)

I'll select "Conceptual" as the current visual style
and i'll run this

(foreach var  '(
		"VSEDGECOLOR"	
		 "VSEDGES"	       "VSEDGESMOOTH"
		 "VSFACESTYLE"	       "VSMATERIALMODE"
		 "VSOBSCUREDEDGES"     "VSOBSCUREDLTYPE"
		 "VSSILHEDGES"	       "VSSILHWIDTH")
  (print var)
  (print (getvar var))(princ))

you will note the difference between each Vstyle and i guess you can make a matrix which condtion
is unique to the current visual style and from there derive a basis

give it a try.. i'm not sure though. its a shot in the dark

[clovis]

To find a variable you could try
(at the acad prompt)
lsp
if you already haven't try it..

[BeKirra]

Thanks to pbejse & clovis.
But what I want is to find something can return a value of the visual style, just is similar to osmode.
So preferring a (getvar "XXX") could do the job.

[dgorsman]

Thanks to pbejse & clovis.
But what I want is to find something can return a value of the visual style, just is similar to osmode.
So preferring a (getvar "XXX") could do the job.

Define "value" in this context? Unlike osnaps with their individual on/off settings visual styles have a boatload of settings with their own accepted values.

[fixo]

For example, if the visual style is wireframe in the current drawing.
How to detect it by autolisp?
Your helps are much appreciated.

Perhaps, like this

 
((lambda ()
   (vl-load-com)
(vl-catch-all-error-message
  (vl-catch-all-apply '(lambda()
   (setq vp (vla-get-activeviewport
    (vla-get-activedocument (vlax-get-acad-object)))
  vp (vlax-vla-object->ename vp)
  elist (entget vp)
  vs (cdr (assoc 348 elist))
  vlist (entget vs)
  vstyle (cdr (assoc 2 vlist)))
   (alert vstyle))))))

[BeKirra]

Perhaps, like this

 
((lambda ()
   (vl-load-com)
(vl-catch-all-error-message
  (vl-catch-all-apply '(lambda()
   (setq vp (vla-get-activeviewport
    (vla-get-activedocument (vlax-get-acad-object)))
  vp (vlax-vla-object->ename vp)
  elist (entget vp)
  vs (cdr (assoc 348 elist))
  vlist (entget vs)
  vstyle (cdr (assoc 2 vlist)))
   (alert vstyle))))))

Thanks for your help.
I tried but it returns the message:

#<SUBR @000000002f428200 -lambda->