不打开DWG，获取存盘版本的方法

LoveArx

[C++] 纯文本查看 复制代码

void GetDwgVersion()

{

  CFileDialog fileDlg(TRUE, _T("dwg"), NULL, OFN_HIDEREADONLY,

      _T("AutoCAD Drawing files (*.dwg) |*.dwg||"));

 

  if (IDOK != fileDlg.DoModal())

    return;

 

  AcDbDatabase *pDb = new AcDbDatabase(Adesk::kFalse, Adesk::kTrue);

  Acad::ErrorStatus es = pDb->readDwgFile(fileDlg.GetPathName());

  if (es != Acad::eOk)

  {

    delete pDb;

    acutPrintf("\nCannot read drawing file.\n");

    return;

  }

 

  // Get the DWG version number.

  AcDb::AcDbDwgVersion dwgVer = pDb->originalFileVersion();

 

  switch (dwgVer)

  {

  case AcDb::kDHL_1002:

    acutPrintf("\nAutoCAD 2.5\n");

    break;

  case AcDb::kDHL_1003:

    acutPrintf("\nAutoCAD 2.6\n");

    break;

  case AcDb::kDHL_1004:

  case AcDb::kDHL_1005:

    acutPrintf("\nRelease 9\n");

    break;

  case AcDb::kDHL_1006:

  case AcDb::kDHL_1007:

  case AcDb::kDHL_1008:

    acutPrintf("\nRelease 10\n");

    break;

  case AcDb::kDHL_1009:

  case AcDb::kDHL_1010:

  case AcDb::kDHL_1011:

    acutPrintf("\nR11 and R12\n");

    break;

  case AcDb::kDHL_1012:

    acutPrintf("\nR13\n");

    break;

  case AcDb::kDHL_1013:

    acutPrintf("\nR14 (mid version).\n");

    break;

  case AcDb::kDHL_1014:

    acutPrintf("\nR14 (final version).\n");

    break;

  case AcDb::kDHL_1500:

    acutPrintf("\nR15 development (Tahoe)\n");

    break;

  case AcDb::kDHL_1015:

    acutPrintf("\nR15 final version (AutoCAD 2000 or above).\n");

    break;

  default:

    acutPrintf("\nUnknown version.\n");

  }

 

  delete pDb;

}

aeo

2. 
   
3. (defun rrrr()
   
4.         (setq file "g:\\Drawing2.dwg")
   
5.         (setq h(open file "r"))
   
6.         (setq line(read-line h))
   
7.         (close h)
   
8.         (substr line 1 6)
   
9. )
   

<br /> (defun rrrr()<br />         (setq file "g:\\Drawing2.dwg")<br />         (setq h(open file "r"))<br />         (setq line(read-line h))<br />         (close h)<br />         (substr line 1 6)<br /> )<br />

;命令: (rrrr)
;"AC1021"

Lisphk

aeo 发表于 2017-12-27 23:13

这着厉害，版主，LISP读入DWG，速度怎么样？
还有，版主，能读出是否是教育版吗? 如果能读出，能写成非教育版不？

yzhyxh

edata

初看代码应该是二楼的通用，read文件才能知道版本，如果是db读取，是否是高版本读不了。。

zeqi1991

你用文本编辑器打开一个dwg文件，然后查看前六个字符就大概知道了，这个很简单