| Up a level |
 |
 |
 |
Property Queries
The following examples define and execute property queries:
(mapcar 'ade_dwgdeactivate (ade_dslist))
(setq ade_tmpprefval (ade_prefgetval "ActivateDwgsOnAttach"))
(ade_prefsetval "ActivateDwgsOnAttach" T)
(ade_dsattach "E:\\ADEDWG\\ARCS2.DWG")
(ade_dsattach "E:\\ADEDWG\\CIRCLES2.DWG")
(ade_dsattach "E:\\ADEDWG\\DONUTS.DWG")
(ade_dsattach "E:\\ADEDWG\\LINES2.DWG")
(ade_dsattach "E:\\ADEDWG\\MAKE.DWG")
(ade_dsattach "E:\\ADEDWG\\POLYGONS.DWG")
(ade_dsattach "E:\\ADEDWG\\POLYLINE.DWG")
(ade_prefsetval "ActivateDwgsOnAttach" ade_tmpprefval)
(ade_qryclear)
(ade_qrysettype 2)
(ade_qrydefine '("" "" "" "Property" ("color" "=" "5")""))
(ade_qryexecute)
(mapcar 'ade_dwgdeactivate (ade_dslist))
(setq ade_tmpprefval (ade_prefgetval "ActivateDwgsOnAttach"))
(ade_prefsetval "ActivateDwgsOnAttach" T)
(ade_dsattach "AUTO:\\AQP5.DWG")
(ade_dsattach "AUTO:\\AQP5A.DWG")
(ade_dsattach "AUTO:\\MAKE.DWG")
(ade_prefsetval "ActivateDwgsOnAttach" ade_tmpprefval)
(ade_qryclear)
(ade_qrysettype "draw")
(ade_qrydefine
'("" "" "" "Property" ("objtype" "=" "SPLINE")""))
(ade_qrydefine
'("OR" "" "" "Property" ("objtype" "=" "ELLIPSE")""))
(ade_qryexecute)