fantasyhk 发表于 2005-4-16 10:39:00

新手求助:VBA里怎样给对象倒角,急!

求助各位朋友,在VBA下怎么给对象倒角.比方说给个矩形倒角,倒角的具体参数是根据矩形的长和宽而变.怎样进行编程,用什么语句!


(具体的功能实现如下:在文本框里输入矩形长宽的树枝,点生成图形时能自动生成图形并倒角!)


先谢谢了 啊!!!

cobalt 发表于 2005-4-17 19:43:00

我是这么处理的：<BR>设定：两条线互相垂直的LWPolylines相交，生成倒角后变成一条LWPolyline。<BR>方法：首先计算得到倒角段起始和结束顶点的坐标位置，然后得到所有的顶点位置放入一个顶点数组，构造一个LWPolyline对象，设置此LWPolyline的Bulge属性。

fantasyhk 发表于 2005-4-19 09:33:00

好的，我试试！谢谢

丹雪 发表于 2005-5-21 10:34:00

为什么不直接调用CAD命令呢?

sieben 发表于 2005-5-21 13:41:00

我的想法同2楼的，在这提醒bulge属性的正负问题，可通过判断p(Index-1),P(Index),P(index+1)三个点的走向来确定bulge的正负,逆时针为正，顺时针为负,


若LwPolyLine在圆角前全位直线段还好办，但若已经存在圆弧则更麻烦,我正在写这些内容，我们可以交流交流
页: [1]
查看完整版本: 新手求助:VBA里怎样给对象倒角,急!