如何获取标尺的中间坐标

前进4 · 发表于 2024-1-8 10:03:52

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

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

lingchention · 发表于 2024-1-9 11:51:21

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

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

前进4 · 发表于 2024-3-13 16:01:30

不知道这个代码你能不能用，点击你需要的器件或者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 · 发表于 2024-5-28 11:47:25

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

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

登录/注册后可看大图

前进4 · 发表于 2024-5-28 14:24:25

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

是begin，我写错了

madmax · 发表于 2024-5-28 18:14:45

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

谢谢~ 我居然没发现

ncash0933 · 发表于 2024-5-31 16:44:32

谢谢分享

小庞学版图 · 发表于 2024-8-20 10:16:42

学习

r102569 · 发表于 2024-9-2 17:55:06

thanks for your share

pennyxm · 发表于 2024-9-2 18:25:43

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

[求助] 如何获取标尺的中间坐标

站长推荐 /2