各位大神这句话可以改为选择cad视口范围吗，就是屏幕上cad的显示的黑色范围

664571221 · 发表于 4 天前

(sssetfirst nil (ssget '((8 . "PM_AZ_GP_管道")))) 这个是要手动选的 (sssetfirst nil (ssget "A" '((8 . "PM_AZ_GP_管道")))) 这个是全图的，可以改为视口范围吗就是绘图区黑色视口的范围

e2002 · 发表于 4 天前

先获取当前视口的范围坐标值

xj6019 · 发表于 4 天前

(defun PM-duijiao (/ height width size middle)
  (setq height (getvar "viewsize"))
  (setq size (getvar "screensize"))
  (setq middle (getvar "viewctr"))
  (setq width (* height (/ (car size) (cadr size))))
  (list       (list (- (car middle) (/ width 2.0))
   (- (cadr middle) (/ height 2.0))
   )
(list (+ (car middle) (/ width 2.0))
(+ (cadr middle) (/ height 2.0))
)
  )
)
(sssetfirst nil (ssget "C" (car(PM-duijiao))(cadr(PM-duijiao)) '((8 . "PM_AZ_GP_管道"))))

664571221 · 发表于 3 天前

xj6019 发表于 2025-2-17 19:18
(defun PM-duijiao (/ height width size middle)
(setq height (getvar "viewsize"))
(setq size (g ...

谢谢陌路.....

dingtiedt · 发表于 3 天前

此“视口”非彼“视口”，一个是view(s)，一个是viewport，都叫“视口”，有时真分不清

664571221 · 发表于前天 09:04

dingtiedt 发表于 2025-2-18 22:52
此“视口”非彼“视口”，一个是view(s)，一个是viewport，都叫“视口”，有时真分不清

谢谢兄弟的回复.....

账号		自动登录	找回密码
密码			注册

[提问] 各位大神这句话可以改为选择cad视口范围吗，就是屏幕上cad的显示的黑色范围