[求助]如何在指定点删除块?

yefoon

已知块的插入点的坐标(x,y),请问如何删除该块?

BDYCAD

在(cons 10(X Y)) ; 處的(X Y)表示坐標點

(IF(setq DEL-SSBLOCK (ssget "x" (list (cons 10(X Y)) (cons 0 "INSERT"))))
  (COMMAND".ERASE" DEL-SSBLOCK""))

yefoon

好像不行  请问还有别的方法吗?

HuaiYu

在(cons 10(X Y)) ; 处的(X Y)表示坐标点

(if (setq del-ssblock (ssget "x" (list (list 10 x y) (cons 0 "insert"))))
    (command ".erase" del-ssblock "")
  )

第2楼版主  写的是对的， 不过(10 x y z)有点手误吧

BDYCAD

不好意思啊, 我没有经测试,