请教AutoCAD的问题。

simem

<P>请教各位高手：</P>
<P>怎样把AutoCAD里面一条曲线的每一点坐标，用data文件的格式输出来？</P>
<P>譬如输出一条曲线的（x,y)坐标，以X坐标每隔0.01mm输出到data文件中？</P>
<P>谢谢指导！</P>

liunan2567

直接导出DXF文件不行吗？

simem

<P>导出DXF后用notepad打开是下面的形式, 它不是以X,y 坐标形式表示的, 有没有办法?</P>
<P>0
SECTION
  2
HEADER
  9
$ACADVER
  1
AC1015
  9
$ACADMAINTVER
70
    13
  9
$DWGCODEPAGE
  3
ANSI_936
  9
$INSBASE
10
0.0
20
0.0
30
0.0
  9
$EXTMIN
10
0.0
20
0.0
30
0.0
  9
$EXTMAX
10
336.2952114749672
20
213.8279021373746
30
0.0
  9
$LIMMIN
10
0.0
20
0.0
  9
$LIMMAX
10
420.0
20
297.0
  9
$ORTHOMODE
70
     0
  9
$REGENMODE
70
     1
  9
$FILLMODE
70
     1
  9
$QTEXTMODE
70
     0
  9
$MIRRTEXT
70
     1
  9
$LTSCALE
40
1.0
  9
$ATTMODE
70
     1
  9
$TEXTSIZE
40
2.5
  9
$TRACEWID
40
1.0
  9
$TEXTSTYLE
  7
Standard
  9
$CLAYER
  8
0
  9
$CELTYPE
  6
ByLayer
  9
$CECOLOR
62
   256
  9
$CELTSCALE
40
1.0
  9
$DISPSILH
70
     0
  9
$DIMSCALE
40
1.0
  9
$DIMASZ
40
2.5
  9
$DIMEXO
40
0.625
  9
$DIMDLI
40
3.75
  9
$DIMRND
40
0.0
  9
$DIMDLE
40
0.0
  9
$DIMEXE
40
1.25
  9
$DIMTP
40
0.0
  9
$DIMTM
40
0.0
  9
$DIMTXT
40
2.5
  9
$DIMCEN
40
2.5
  9
$DIMTSZ
40
0.0
  9
$DIMTOL
70
     0
  9
$DIMLIM
70
     0
  9
$DIMTIH
70
     0
  9
$DIMTOH
70
     0
  9
$DIMSE1
70
     0
  9
$DIMSE2
70
     0
  9
$DIMTAD
70
     1
  9
$DIMZIN
70
     8
  9
$DIMBLK
  1</P>
<P>  9
$DIMASO
70
     1
  9
$DIMSHO
70
     1
  9
$DIMPOST
  1</P>
<P>  9
$DIMAPOST
  1</P>
<P>  9
$DIMALT
70
     0
  9
$DIMALTD
70
     3
  9
$DIMALTF
40
0.03937007874016
  9
$DIMLFAC
40
1.0
  9
$DIMTOFL
70
     1
  9
$DIMTVP
40
0.0
  9
$DIMTIX
70
     0
  9
$DIMSOXD
70
     0
  9
$DIMSAH
70
     0
  9
$DIMBLK1
  1</P>
<P>  9
$DIMBLK2
  1</P>
<P>  9
$DIMSTYLE
  2
ISO-25
  9
$DIMCLRD
70
     0
  9
$DIMCLRE
70
     0
  9
$DIMCLRT
70
     0
  9
$DIMTFAC
40
1.0
  9
$DIMGAP
40
0.625
  9
$DIMJUST
70
     0
  9
$DIMSD1
70
     0
  9
$DIMSD2
70
     0
  9
$DIMTOLJ
70
     0
  9
$DIMTZIN
70
     8
  9
$DIMALTZ
70
     0
  9
$DIMALTTZ
70
     0
  9
$DIMUPT
70
     0
  9
$DIMDEC
70
     2
  9
$DIMTDEC
70
     2
  9
$DIMALTU
70
     2
  9
$DIMALTTD
70
     3
  9
$DIMTXSTY
  7
Standard
  9
$DIMAUNIT
70
     0
  9
$DIMADEC
70
     0
  9
$DIMALTRND
40
0.0
  9
$DIMAZIN
70
     0
  9
$DIMDSEP
70
    46
  9
$DIMATFIT
70
     3
  9
$DIMFRAC
70
     0
  9
$DIMLDRBLK
  1</P>
<P>  9
$DIMLUNIT
70
     2
  9
$DIMLWD
70
    -2
  9
$DIMLWE
70
    -2
  9
$DIMTMOVE
70
     0
  9
$LUNITS
70
     2
  9
$ASEBlockHierarchyIndexRecord
350
2F
1001
DCO15
1040
1503299759.221
  0
LAYOUT
  5
22
102
{ACAD_REACTORS
330
1A
102
}
330
1A
100
AcDbPlotSettings
  1</P>
<P>  2
Adobe PDF
  4</P>
<P>  6</P>
<P>40
0.0
41
0.0
42
0.0
43
0.0
44
0.0
45
0.0
46
0.0
47
0.0
48
0.0
49
0.0
140
0.0
141
0.0
142
1.0
143
1.0
70
  1712
72
     0
73
     0
74
     0
  7</P>
<P>75
     0
147
1.0
148
0.0
149
0.0
100
AcDbLayout
  1
Model
70
     1
71
     0
10
0.0
20
0.0
11
12.0
21
9.0
12
0.0
22
0.0
32
0.0
14
0.0
24
0.0
34
0.0
15
0.0
25
0.0
35
0.0
146
0.0
13
0.0
23
0.0
33
0.0
16
1.0
26
0.0
36
0.0
17
0.0
27
1.0
37
0.0
76
     0
330
1F
  0
LAYOUT
  5
1E
102
{ACAD_REACTORS
330
1A
102
}
330
1A
100
AcDbPlotSettings
  1</P>
<P>  2
Adobe PDF
  4</P>
<P>  6</P>
<P>40
0.0
41
0.0
42
0.0
43
0.0
44
0.0
45
0.0
46
0.0
47
0.0
48
0.0
49
0.0
140
0.0
141
0.0
142
1.0
143
1.0
70
   688
72
     0
73
     0
74
     5
  7</P>
<P>75
    16
147
1.0
148
0.0
149
0.0
100
AcDbLayout
  1
布局1
70
     1
71
     1
10
0.0
20
0.0
11
420.0
21
297.0
12
0.0
22
0.0
32
0.0
14
1.000000000000000E+20
24
1.000000000000000E+20
34
1.000000000000000E+20
15
-1.000000000000000E+20
25
-1.000000000000000E+20
35
-1.000000000000000E+20
146
0.0
13
0.0
23
0.0
33
0.0
16
1.0
26
0.0
36
0.0
17
0.0
27
1.0
37
0.0
76
     0
330
1B
  0
LAYOUT
  5
26
102
{ACAD_REACTORS
330
1A
102
}
330
1A
100
AcDbPlotSettings
  1</P>
<P>  2
Adobe PDF
  4</P>
<P>  6</P>
<P>40
0.0
41
0.0
42
0.0
43
0.0
44
0.0
45
0.0
46
0.0
47
0.0
48
0.0
49
0.0
140
0.0
141
0.0
142
1.0
143
1.0
70
   688
72
     0
73
     0
74
     5
  7</P>
<P>75
    16
147
1.0
148
0.0
149
0.0
100
AcDbLayout
  1
布局2
70
     1
71
     2
10
0.0
20
0.0
11
12.0
21
9.0
12
0.0
22
0.0
32
0.0
14
0.0
24
0.0
34
0.0
15
0.0
25
0.0
35
0.0
146
0.0
13
0.0
23
0.0
33
0.0
16
1.0
26
0.0
36
0.0
17
0.0
27
1.0
37
0.0
76
     0
330
23
  0
MLINESTYLE
  5
18
102
{ACAD_REACTORS
330
17
102
}
330
17
100
AcDbMlineStyle
  2
STANDARD
70
     0
  3</P>
<P>62
   256
51
90.0
52
90.0
71
     2
49
0.5
62
   256
  6
BYLAYER
49
-0.5
62
   256
  6
BYLAYER
  0
ACDBPLACEHOLDER
  5
F
102
{ACAD_REACTORS
330
E
102
}
330
E
  0
DICTIONARYVAR
  5
32
102
{ACAD_REACTORS
330
30
102
}
330
30
100
DictionaryVariables
280
     0
  1
2
  0
DICTIONARYVAR
  5
31
102
{ACAD_REACTORS
330
30
102
}
330
30
100
DictionaryVariables
280
     0
  1
1
  0
XRECORD
  5
2F
102
{ACAD_REACTORS
330
2D
102
}
330
2D
100
AcDbXrecord
280
     1
  0
ENDSEC
  0
EOF
</P>

liunan2567

对不起，我对DXF文件格式也不熟，但我问过。DXF表示曲线是这样的：用三个点来表示一小段贝塞尔曲线，一段曲线由多个小段曲线组成。至于你说的“输出一条曲线的（x,y)坐标，以X坐标每隔0.01mm输出到data文件中”需专门编程才行。或者你在CAD网站上找找看。

alenjordan

<P>编程</P><P>在AUTOCAD中宏命令中加入所编的程序</P><P>对所获得的图形执行宏命令即可</P>

ggx1945813

我清楚，有时间再给你答复。

simem

谢谢各位兄长支招，小弟现在问题还没解决，还没找到相关的资料。

ggx1945813

告述邮箱号，我将VB程序发给你，事先请清空邮箱。

GGX19458132

文件已上传，文件号为：

GGX19458132

simem：

该压缩文件包中有用VB程序处理DXF文件的原理详述（主要用于实体中直线，弧，圆的读入与VB中转换作图）。AutoCAD 的曲线轮括图如果是多义线或是贝赛尔曲线，应先炸成直线，弧，圆的基本图素再处理。内中的1.DXF文件是已炸开的50齿渐开线尺轮的DXF文件，即可读入Autocad中，也可用工程1.exe在VB程序中展现图形（Xmax=130,Ymax=110,DXF输入文件名:1→点击“转换”钮即可），该程序的编程原理可以解决你的问题。有不清楚处，请指出。

祝顺利！ GGX19458132

simem

多谢高老师指导！小弟不胜感激！

GGX19458132

不客气。