如何获取标尺的中间坐标

前进4

youxing 发表于 2023-10-19 17:09
在个人目录下。没有就自己建一个。

你好，有没有获取中间得坐标

lingchention

youxing 发表于 2023-10-19 17:09
在个人目录下。没有就自己建一个。

那请问617的话， .cdsenv里面怎么添加语句呢？谢谢

前进4

不知道这个代码你能不能用，点击你需要的器件或者ruler使用
  procedure(CreateMidRuler()
let((cv bbox xBegin yBegin xEnd yEnd midx midy xy)
    cv=geGetEditCellView()
    bbox=geGetSelSet()~>bBox
    xBegin=caaar(bbox)
    yBegin=cadaar(bbox)
    xEnd=caadar(bbox)   
    yEnd=car(cdadar(bbox))
    midx=(xEnd+xBegain)/2
    midy=(yEnd+yBegain)/2
    xy=list(midx midy)
    dbCreateRuler(cv list(xy car(xy):cadr(xy)+10))
    dbCreateRuler(cv list(xy car(xy):cadr(xy)-10))
    dbCreateRuler(cv list(xy car(xy)+10:cadr(xy)))
    dbCreateRuler(cv list(xy car(xy)-10:cadr(xy)))
))

   

madmax

前进4 发表于 2024-3-13 16:01
不知道这个代码你能不能用，点击你需要的器件或者ruler使用
  procedure(CreateMidRuler()
let((cv bbox x ...

佬，我试用了您的脚本load成功了，但是在使用的时候会报如下错误，请问是什么问题呢？

                               
登录/注册后可看大图

前进4

都懵 发表于 2024-5-28 11:47
佬，我试用了您的脚本load成功了，但是在使用的时候会报如下错误，请问是什么问题呢？
...

是begin，我写错了

madmax

前进4 发表于 2024-5-28 14:24
是begin，我写错了

谢谢~ 我居然没发现

ncash0933

谢谢分享

小庞学版图

学习

r102569

thanks for your share

pennyxm

确实好用，感谢感谢！！！