#import "F:\ACAD2000\acad.tlb" no_namespace named_guids
....
IAcadApplicationPtr pAcadApp;
.... HRESULT h=NOERROR;
CLSID clsid;
::CLSIDFromProgID(L"AutoCAD.Application",&clsid);
h=pAcadApp.GetActiveObject(clsid);
if(SUCCEEDED(h))
{
::AfxMessageBox("GetObject ok");
}
else {
::AfxMessageBox("GetObject Fail!");
if(pAcadApp.CreateInstance(clsid)==S_OK)
::AfxMessageBox("CreateObject ok");
else
{
::AfxMessageBox("CreateObject Fail!");
::PostQuitMessage(0);
}
} pAcadApp->WindowState=acMax;
pAcadApp->Visible=TRUE;
获取相关对象:
pAcadDoc=pAcadApp->ActiveDocument;//可能没有当前的文档,提示出错.
pAcadDoc->get_ModelSpace(&pAcadMSpace);
pAcadApp->WindowState=acMax;
pAcadApp->Visible=TRUE;
可参考帮助文件中对象图
.........
....
IAcadApplicationPtr pAcadApp;
.... HRESULT h=NOERROR;
CLSID clsid;
::CLSIDFromProgID(L"AutoCAD.Application",&clsid);
h=pAcadApp.GetActiveObject(clsid);
if(SUCCEEDED(h))
{
::AfxMessageBox("GetObject ok");
}
else {
::AfxMessageBox("GetObject Fail!");
if(pAcadApp.CreateInstance(clsid)==S_OK)
::AfxMessageBox("CreateObject ok");
else
{
::AfxMessageBox("CreateObject Fail!");
::PostQuitMessage(0);
}
} pAcadApp->WindowState=acMax;
pAcadApp->Visible=TRUE;
获取相关对象:
pAcadDoc=pAcadApp->ActiveDocument;//可能没有当前的文档,提示出错.
pAcadDoc->get_ModelSpace(&pAcadMSpace);
pAcadApp->WindowState=acMax;
pAcadApp->Visible=TRUE;
可参考帮助文件中对象图
.........
解决方案 »
- 用chtmlview下载文件时要取消“文件下载”对话框要重载那个函数?
- 进行贴图的一个问题...
- 关于IHtmlFramesCollection2接口的问题,请各位大哥帮忙!!
- 哪位推荐一个好的开源项目
- 关于编译错误的问题
- 有关int变量用%f输出的问题。
- 【=×易×=在看Windows程序设计遇到问题,无unicode版的正常,_UNICODE版的有错】
- 谁可以帮一帮我?
- 寻找 系统监控资料(做一个类似网吧管理系统) 急
- 请问怎么实现目录保护???
- 原来分析字符串有这么一个好东东,觉得分析命令行参数麻烦的同志请看.....
- 急!!!菜鸟问题:输入一段字符串,如果该字符串已在某一文件中,则执行某一特定的操作
你好!谢谢提醒。