使用ObjectARX在AutoCAD2002中画直线

来源：互联网发布：手机文本朗读软件编辑：程序博客网时间：2024/05/29 04:21

1）在VC6.0中，使用向导创建一个新的ObjectARX项目，名称叫CreateLine3。使用ObjectARX嵌入工具注册一个新的命令createline。

在【Command flags】选项组中，从【Document】列表中选择【Shared write】选项，取消选择【Use pickset】复选框，【Command】命令类型选择【Model】。

在【Group】文本框中输入CHAP2，【International】文本框中输入CreateLine，左键在【Local】文本框内单击，
系统自动添加CreateLine文本，使用系统自动给出的名称WhCHAP2CreateLine作为CreateLine命令执行的函数名称。
设置命令名称和标记之后，单击【Add】命令就能注册该命令。单击【OK】按钮关闭命令注册的对话框。如下图所示：

图（1）设置createline命令的属性

2）在XXXCommand.cpp中编写与createline命令相关函数：WhCHAP2CreateLine，内容如下：

//XXXCommand.cpp的代码内容

//// ObjectARX defined commands#include "StdAfx.h"#include "StdArx.h"#include "dbents.h"// This is command 'CREATELINE'void WhCHAP2CreateLine(){// TODO: Implement the command//在内存上创建一个新的AcDbLine对象AcGePoint3d ptStart(500,500,0);AcGePoint3d ptEnd(560,500,0);AcDbLine *pLine=new AcDbLine(ptStart,ptEnd);//获得指向块表的指针AcDbBlockTable *pBlockTable;acdbHostApplicationServices()->workingDatabase()->getBlockTable(pBlockTable,AcDb::kForRead);//获得指向特定的块表记录(模型空间)的指针AcDbBlockTableRecord *pBlockTableRecord;pBlockTable->getAt(ACDB_MODEL_SPACE,pBlockTableRecord,AcDb::kForWrite);//将AcDbLine类的对象添加到块表记录中AcDbObjectId lineId;pBlockTableRecord->appendAcDbEntity(lineId,pLine);pLine->setColorIndex(1); //设置直线为红色//关闭图形数据库的各种对象pBlockTable->close();pBlockTableRecord->close();pLine->close();}

3）按F7编译程序，按F5调试程序并加载cad.exe，打开AutoCAD2002后，在AutoCAD2002的命令行窗口输入命令：

appload

在工程的Debug目录里找到.arx文件，并加载.arx -->关闭，在AutoCAD2002的命令行窗口输入命令：

createline

效果如下：

图（2）输入appload命令加载.arx文件，输入createline命令执行画直线功能

1 0