|
|
悬赏100资产已解决
把polygon转换成Path的小程序,结果长方形不行。其他形状都可以。
刚试了一下3个都是: 直的不行,拐弯的可以,就离谱。(见附件)
第一个:
hiSetBindKey("Layout" "Ctrl<key>e" "polygon2Path()")
procedure( polygon2Path()
cv = geGetEditCellView()
objs = geGetSelSet()
foreach(obj objs
if( obj~>objType == "polygon" then
leConvertPolygonToPath(obj)
);if
))
第二个:
hiSetBindKey("Layout" "Ctrl<key>e" "polygon2Path()")
procedure( polygon2Path()
cv = geGetEditCellView()
objs = geGetSelSet()
for(i 0 length(objs)-1
obj = nth(i, objs)
if(obj~>objType == "polygon" then
leConvertPolygonToPath(obj))
);for
)
第三个:
hiSetBindKey("Layout" "Ctrl<key>e" "polygon2Path()")
procedure( polygon2Path()
cv = geGetEditCellView()
objs = geGetSelSet()
objp = setof(x objs x~>objType == "polygon")
for(i 0 length(objp)-1
obj = nth(i, objp)
leConvertPolygonToPath(obj));endfor
);pro
|
最佳答案
查看完整内容
把判断改成 obj~>objType == "polygon" || obj~>objType == "rect"
|