Code Red > XDRX-API

[XDrX-PlugIn(150)] Zoom to the extents of selected objects.

(1/1)

xdcad:

--- Code: ---(defun c:xdtb_qzoom (/ ss)
  (if (setq ss (xdrx-ssget
(xdrx-string-multilanguage
   "\n选择要zoom的对象<退出>:"
   "\nSelect the object to zoom <Exit>:"
)
       )
      )
    (xdrx-document-zoomentities ss 0.95)
  )
  (princ)
)

--- End code ---

Navigation

[0] Message Index