topic Re: Select all object that have Object Data in AutoCAD Map 3D Developer Forum

Select all object that have Object Data

vladimir.ninic — Mon, 25 Sep 2017 09:45:22 GMT

I am trying to automate some steps in Autocad Map 3d 2018 using Lisp.

After drawing some polygons and adding some object data to them I would like ti check if there are some objects without object data left.

I would like to select objects without data and change their colour in RED.

Another approach is to select all objects and subtract object with object data from selection.

Any ideas? Thnx.

Re: Select all object that have Object Data

Norman_Yuan — Mon, 25 Sep 2017 13:06:00 GMT

With AutoCAD's built-in selecting API (COM/.NET/LISP), you cannot select entities with filter applying to ObjectData. So, you have to loop through all entities in order to test whether an entity having object data attached, or object data record from specific table attached.

You can also use Map's query API to query the drawing on object data.

Re: Select all object that have Object Data

mmitchellH6TRW — Thu, 09 Dec 2021 23:04:33 GMT

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; Command: SDO (Select Data Objects) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (defun c:SDO (/ sa ss index) (setq sa (ssget "_X") ss (ssadd) index 0 ) (while (< index (sslength sa)) (if (ade_odgettables (ssname sa index)) (setq ss (ssadd (ssname sa index) ss)) ) (setq index (1+ index)) ) (sssetfirst nil ss) (gc) (princ) ) (princ "\nSDO to Select Data Objects.") (princ)

While this code selects all objects with OD data, by making it an else.... it selects all non-OD objects.

(if (ade_odgettables (ssname sa index)) (princ) (setq ss (ssadd (ssname sa index) ss)) )

Re: Select all object that have Object Data

АлексЮстасу — Fri, 10 Dec 2021 21:45:26 GMT

See https://forums.autodesk.com/t5/autocad-map-3d-forum/applications-for-object-data/m-p/10815438#M59781