请skill大佬帮忙看下这个脚本代码问题在哪里

sr1245648455

hiSetBindKey("Layout" "<Key>F6" "Delete_AP()")
procedure(Delete_AP()
let((shapes Point cv a pin)
cv=geGetEditCellView()
a=geGetSelSet()
pin=car(setof(x a x~>lpp==list("AP" "pin")))
point=pin~>xy
shapes=dbShapeQuery(cv list("AP" "drawing") point)
foreach(shape shapes
dbDeleteObject(shape)
)))


脚本想实现的功能就是选中单个AP pin，然后删除pin上对应的AP层，运行报error： length:argument must be a list or an array -38.07   
刚学习skill不久，有点找不到问题了，请大佬们帮忙指点一下，多谢了

光非

dbShapeQuery(deGetCellView() list("AP" "drawing") car(pin~>bBox))   还有就是单个删除，不用foreach

sr1245648455

光非 发表于 2023-12-12 16:11
dbShapeQuery(deGetCellView() list("AP" "drawing") car(pin~>bBox))   还有就是单个删除，不用foreach ...

还是报同样的错，好像是坐标表达方式应该有问题

光非

sr1245648455 发表于 2023-12-12 16:28
还是报同样的错，好像是坐标表达方式应该有问题

没错啊，你试试这个

1. procedure(de_ap()
   
2.         let((shape)
   
3.         shape = dbShapeQuery(deGetCellView() list("AP" "drawing") css()~>bBox)
   
4.         dbDeleteObject(car(shape))
   
5.         );let
   
6. );procedure
   

复制代码

sr1245648455

光非 发表于 2023-12-12 16:51
没错啊，你试试这个

哥，还有个问题就是  我想查找某坐标上的AP drawing层，但是AP不在当前层，在cell底层，用什么函数呢

光非

sr1245648455 发表于 2023-12-12 17:43
哥，还有个问题就是  我想查找某坐标上的AP drawing层，但是AP不在当前层，在cell底层，用什么函数呢
...

才发现昨天写错了，刚刚更新了，delete里面需要加一个car，在 cell 里面也可以 delete 掉啊，你就是需要改一下delete，改成
dbDeleteObject(cadar(shape))