基于ActiveX通过vc进行AutoCAD二次开发有问题要问！！！
通过一个4×4的矩阵对一条直线进行缩放和平移代码如下:
void CWanDlg::OnButtonRelativeScale()
{
UpdateData(true);
IAcadLine Line；
IAcadModelSpace m_IMSpace;
SAFEARRAYBOUND RSbound;
RSbound.lLbound = 0;
RSbound.cElements = 4*4;
SAFEARRAY * pStartPoint = NULL;
pStartPoint= ::SafeArrayCreate(VT_R8,1,&RSbound);
if(!pStartPoint) AfxMessageBox("SafeArrayCreate error!");
double TransMatrix;
int index1,index2;
//初始化矩阵
for(index1=0;index1<4;index1++)
{
for(index2=0;index2<4;index2++)
{
TransMatrix=0;
}
}
//m_RSFactor为4*4矩阵的对角线上的变量
TransMatrix=m_RSFactor;
TransMatrix=m_RSFactor;
TransMatrix=m_RSFactor;
TransMatrix=1;
//把数组赋值道SAFEARRAY里
long i=0;
for(index1=0;index1<4;index1++)
{
for(index2=0;index2<4;index2++)
{
SafeArrayPutElement(pStartPoint,&i,&TransMatrix);
i++;
}
}
VARIANT pRS;
VariantInit(&pRS);
pRS.vt =VT_ARRAY|VT_R8;
pRS.parray =pStartPoint;
//激活所绘的最后一条直线
int m_LineNum=m_IMSpace.GetCount();
VARIANT temp;
VariantInit(&temp);
temp.vt =VT_I2;
temp.iVal =m_LineNum-1;
Line=m_IMSpace.Item(temp);
Line.TransformBy(pRS);//转置 （这里出现了问题）
望各位大侠能帮小弟解决！！！
页:
[1]