如何自动新建一个DWG并置为当前!

bai_cai101

我顶!!问题解决不了我就不让它沉下去了!!板主!帮帮我了!????

bai_cai101

我顶！！！

lange

//找到新建文件
AcApDocument* pDoc=NULL;
AcApDocumentIterator* pDocIter;
pDocIter = acDocManager->newAcApDocumentIterator();
for ( ; !pDocIter->done(); pDocIter->step())
{
   if( !strcmp(pDocIter->document()->fileName(), "新建文件名") )
   {
       pDoc = pDocIter->document();
    break;
    }
}
delete pDocIter;
//设成活动文档
if( pDOC)
    acDocManager->activateDocument(pDoc);

bai_cai101

我试了，怎么不行啊！我用的是VC6。0，ARX2000,编译通过，但在CAD2002中运行却没有一点反应！！！WHY？？

binbinxx

AcDbDatabase(

bool buildDefaultDrawing = true,

bool noDocument = false);

buildDefaultDrawing	Boolean specifying whether or not to build an empty object
noDocument	Boolean specifying whether or not to associate this database to the current document

第二个参数

zfbj

现在工作时间没法上网，偶然路过，发现这个问题居然让老弟如此伤神，实在不忍，特整理一个工程贴上来供参考，其实这个工程也没什么特别的，下面是创建该工程的过程。希望你能结合老金的文章好好理解，因为我再来看这个帖子的几率不大…

（1）使用ObjectARX向导创建一个新工程；
（2）注册一个命令NewDoc，其实现函数为：
void ZffTempNewDoc()
{
 static char pData[] ="acad.dwt";
 acDocManager->executeInApplicationContext(CreateDoc, (void *)pData);
}
（3）将下面的函数复制到ZffTempNewDoc函数的前面：
void CreateDoc( void *pData)
{
 AcApDocument* pDoc = acDocManager->curDocument();
 if (acDocManager->isApplicationContext())
 {
  acDocManager->appContextNewDocument((const char *)pData);
 }
 else
 {
  acutPrintf("\nERROR To Create Doc!\n"); // 这一行老金有个笔误，后一个引号用了中文的，我已经改过来了
 }
}
（4）编译链接程序，启动AutoCAD 2002，执行NewDoc命令即可创建一个新文件，没有对话框的出现。

glhu3

//
// ObjectARX defined commands, created by  [2005-5-17], ,

#include "StdAfx.h"
#include "StdArx.h"
#include "dbsymtb.h"
#include "dbents.h"

//-----------------------------------------------------------------------------
// This is command 'NEWDOC, by  [2005-5-17], ,
void ACADnewdoc()
{
#ifdef OARXWIZDEBUG
 acutPrintf ("\nOARXWIZDEBUG - ACADnewdoc() called.");
#endif // OARXWIZDEBUG

 // TODO: Implement the command
 static char pData[] ="acad.dwt";
 acDocManager->executeInApplicationContext(CreateDoc, (void *)pData);

 AcDbDatabase *pdb =acdbHostApplicationServices()->workingDatabase();

 AcDbBlockTable *pBtbl;
    pdb->getSymbolTable(pBtbl, AcDb::kForRead);

    AcDbBlockTableRecord *pBtblRcd;
    pBtbl->getAt(ACDB_MODEL_SPACE, pBtblRcd,
        AcDb::kForWrite);
    pBtbl->close();

    AcDbCircle *pCir1 = new AcDbCircle(AcGePoint3d(1,1,1),
                                       AcGeVector3d(0,0,1),
                                       1.0),
               *pCir2 = new AcDbCircle(AcGePoint3d(4,4,4),
                                       AcGeVector3d(0,0,1),
                                       2.0);
    pBtblRcd->appendAcDbEntity(pCir1);
    pCir1->close();
   
    pBtblRcd->appendAcDbEntity(pCir2);
    pCir2->close();
    pBtblRcd->close();

}

void CreateDoc( void *pData)
{
 AcApDocument* pDoc = acDocManager->curDocument();
 if(acDocManager->isApplicationContext())
 {
  acDocManager->appContextNewDocument((const char *)pData);
 }
 else
  acutPrintf("\nERROR To Create Doc!\n");
}

----------------------------------------------
QQ:224310836,bai_cai101@163.com!欢迎交流!!

----------------------------------------------------------------

上述代码执行后，圆并未画在新建出来的DWG文挡上，而画在了前一个DWG文挡上，这样新建的DWG并不是当前的WorkingDatabase

glhu3

//
// ObjectARX defined commands, created by  [2005-5-17], ,

#include "StdAfx.h"
#include "StdArx.h"
#include "dbsymtb.h"
#include "dbents.h"

//-----------------------------------------------------------------------------
// This is command 'NEWDOC, by  [2005-5-17], ,
void ACADnewdoc()
{
#ifdef OARXWIZDEBUG
 acutPrintf ("\nOARXWIZDEBUG - ACADnewdoc() called.");
#endif // OARXWIZDEBUG

 // TODO: Implement the command
 static char pData[] ="acad.dwt";
 acDocManager->executeInApplicationContext(CreateDoc, (void *)pData);

 AcDbDatabase *pdb =acdbHostApplicationServices()->workingDatabase();

 AcDbBlockTable *pBtbl;
    pdb->getSymbolTable(pBtbl, AcDb::kForRead);

    AcDbBlockTableRecord *pBtblRcd;
    pBtbl->getAt(ACDB_MODEL_SPACE, pBtblRcd,
        AcDb::kForWrite);
    pBtbl->close();

    AcDbCircle *pCir1 = new AcDbCircle(AcGePoint3d(1,1,1),
                                       AcGeVector3d(0,0,1),
                                       1.0),
               *pCir2 = new AcDbCircle(AcGePoint3d(4,4,4),
                                       AcGeVector3d(0,0,1),
                                       2.0);
    pBtblRcd->appendAcDbEntity(pCir1);
    pCir1->close();
   
    pBtblRcd->appendAcDbEntity(pCir2);
    pCir2->close();
    pBtblRcd->close();

}

void CreateDoc( void *pData)
{
 AcApDocument* pDoc = acDocManager->curDocument();
 if(acDocManager->isApplicationContext())
 {
  acDocManager->appContextNewDocument((const char *)pData);
 }
 else
  acutPrintf("\nERROR To Create Doc!\n");
}

----------------------------------------------
QQ:224310836,bai_cai101@163.com!欢迎交流!!

---------------------------------------------------------------------

该例新建的DWG文挡不是当前的WorkingDatabase的指针，而是前一个。希望作者

或哪位高手解决一下这个问题。

houlinbo

Try
            Dim cadApp As AcadApplication = GetObject(, "AutoCAD.Application.17")
            Dim olDb As Database = HostApplicationServices.WorkingDatabase
            Dim db As Database = New Database(True, False)
            HostApplicationServices.WorkingDatabase = db
            Dim trans As Transaction = db.TransactionManager.StartTransaction()
            Dim bt As BlockTable = trans.GetObject(db.BlockTableId, OpenMode.ForWrite)
            Dim br As Circle = CreateCircle(db, bt)
            db.SaveAs("d:\ff.dwg", DwgVersion.AC1015)
            HostApplicationServices.WorkingDatabase = olDb
            trans.Commit()
            trans.Dispose()
            Dim cadDoc As AcadDocument = cadApp.Documents.Open("d:\ff.dwg")
            cadDoc.WindowState = Common.AcWindowState.acMax
            cadDoc.Application.ZoomExtents()
        Catch ex As Exception

        End Try
    End Sub