将Dwg格式转换为Visual basic

aykut66 · 发表于 2022-7-6 22:09:58

亲爱的朋友们，您好，
我正在做一个改造图纸的项目。
我想将AutoCAD文件读入VB程序，以便生成具有相同坐标的等效图形。
为此，我需要知道AutoCAD绘图文件的文件格式，其中包含直线、圆的坐标。etc（形状）。我想学习这个形状的起始和结束位置。
“如何将扩展名为（.DWG）的AutocAD文件读入VB程序，以获得图形对象的精确值n（线等）

请用你宝贵的知识和经验来帮助我。

顺致敬意，
艾库特
科卡埃利大学

ReMark · 发表于 2022-7-6 22:22:29

这不需要DXF文件吗？

dbroada · 发表于 2022-7-6 22:41:36

我怀疑您是否能够解码dwg文件，因为它基本上是一个压缩的数据库文件，而且我无法看到AutoDesk轻松发布其压缩算法。如果你从一个DXF文件开始，你会得到更多，虽然这是一个文本文件，可以用一点时间阅读它来解释。

RICVBA · 发表于 2022-7-6 22:51:25

@aykut66
我在某处读到，使用“ObjectDBX”，您可以从图形中获取信息，甚至可以在不打开图形的情况下编辑图形。
这里有一段代码片段，我把它放在一边，当有一天我要与这个论点作斗争时

copy

dim sampleFilePath as string
dim dbx as axdbdocument
dim doc as acaddocument
dim partListRefIndex as integer
sampleFilePath = "somewhere/sample.dwg"
set dbx = new axdbdocument
set doc = thisDrawing
' Let's point both version to the same file
doc.open(sampleFilePath, READ_ONLY)
dbx.open(sampleFilePath)