测量path长度及rectangle长宽
这个skill脚本可以用来测量path的长度和rectangle的长宽。 用法：复制代码保存为 measurelength.il, 在icfb的CIW窗口 load "measurelength.il" 在layout界面选中要测量的path或rectangle, 按下 Ctrl+k 即可显示相关尺寸，如下图所示。
/* Synopsis : Path_Length()
Version : 1.0a
Description : Measure Path & Rectangle Length */
procedure( Path_Length()
prog( (winId cvId selObj shape points llx lly urx ury)
winId = hiGetCurrentWindow()
cvId = getEditRep(winId)
selObj = geGetSelSet(cvId)
leClearAllRuler(cvId)
foreach(shape selObj
case( shape~>objType
("rect" || "inst"
Box = shape~>bBox
llx = car(car(Box))
lly = cadr(car(Box))
urx = car(cadr(Box))
ury = cadr(cadr(Box) )
points= list((llx:(lly+ury)/2)(urx:(lly+ury)/2))
leCreateRuler(cvId points)
points= list(((llx+urx)/2:lly)((llx+urx)/2:ury))
leCreateRuler(cvId points)
)
("path"
points = shape~>path leCreateRuler(cvId points) )
(t hiDisplayAppDBox(?name
'JWPath_Length
?buttonLayout 'Close
?dboxBanner "Warning!!"
?dboxText "No Select Objet (rect/cell/path)")
)
);case )
;foreach
);prog
);procedure
hiSetBindKey("Layout" "Ctrl<Key>k" "Path_Length()")