问最后的一问题，以后可能少来论坛了

wholin · 发表于 2006-10-30 10:07:00

我的项目快开发完了，以后可能比较少来论坛了，我会想大家，感谢大家以前的精彩解答

我的问题：怎样在一个多段线上的每个顶点加一个半径为5的圆?

wholin · 发表于 2006-10-30 11:14:00

Set pacir = ThisDrawing.ModelSpace.AddLightWeightPolyline(objPoly.Coordinates)

将顶点连个多段线可以

但是 Set pacir = ThisDrawing.ModelSpace.AddCircle(objPoly.Coordinates, 5)在每个顶点画个半径为5的圆就不行

夜孤城 · 发表于 2006-10-30 18:27:00

AddLightWeightPolyline 给的参数是多个点的坐标，

AddCircle需要的参数是一个点的坐标，

For each 点 in objPoly.Coordinates

Set pacir = ThisDrawing.ModelSpace.AddCircle(objPoly.Coordinates, 5)

HuaiYu · 发表于 2006-10-30 20:42:00

将5改成5.0或5#

账号		自动登录	找回密码
密码			注册