已知圆弧,怎么求一直线.

00lg

小弟近来想编一个组件,需要各位大大帮忙.这个组件的功能是这样的.

选择一条园弧,自动求出它的两个端点,在这两点间画一条直线.

请大家帮忙,不胜感激.

fjfhgdwfn

看ARC的属性

00lg

大哥,我就是不会看才问.

chenyaqiou

虽然我不是大侠，但是我还是觉得这个问题超简单。

如果是在VBA中，可以

DIM ARCOBJ AS ACADARC

DIM LINEOBJ AS ACADLINE

DIM PT AS VARIANT

THISDRAWING.UTILITY.GETENTITY ARCOBJ,PTS,"取圆弧线"

SET LINEOBJ=THISDRAWING.MODELSPACE.ADDLINE(ARCOBJ.STARTPOINT,ARCOBJ.EDNPOINT)