㈠ 怎样把TXT格式的文件导进cad里画成地形图。求大神帮我画地形图。有会的联系我扣1359797097
可以把txt文件转换成图片格式,在cad里直接导入图片
或者在cad里取文字,把txt文件拷贝粘贴到cad的文字中
㈡ cad中如何导入txt文件
1.找到你所需要的翼型数据后,将数据复制并保存到一个名叫翼型的文本文件中。左边一列为X坐标,右边一列为Y坐标。
2.打开新建一个EXCEL表格并打开,如果您使用的是Excel 2000,那么从"数据"菜单开始,点击"获取外部数据"菜单项,然后选择"导入文本文件"菜单选项;如果您使用的是Excel 2003的话,那么从"数据"菜单开始,依次点击"导人外部数据","导入数据"菜单选项。这时都会出现一个选择数据源的窗口,在该窗口中找到数据源,然后直接双击它即可。这是后会有一个文本导入向导一步一步帮我们把数据导入到表格中。
选择翼型数据所在文件“翼型.txt”,并打开。
数据导入成功,如图所示:
3、在C2单元格2内输入:=A2&”,”&B,C2中就出现了一对坐标值。我们用鼠标拖动的方法将C2的的公式进行复制,就可以得到一组坐标值。
选出所需画线的点的坐标值,如上例中C列数据,将其复制到剪贴板上,即按Excel中的复制按钮来完成此工作。
4.打开AUTOCAD,新建一个文件。在命令行处键入spline。当出现“指定第一个点或对象(O)时,再在此位置处点击鼠标右键,弹出菜单,在菜单中选择Paste命令,这样在Excel中的坐标值就传送到了AutoCAD中,并自动连接成曲线,
当命令行出现“指定下一点或 [闭合(C)/拟合公差(F)] <起点切向>:”时,敲回车键;
当命令行出现“指定起点切向:”时将光标移动至水平位置,并按下左键。
此时一个翼型就基本画成了。此时的弦长为“1”
再根据所做模型的大小对翼型的进行放大。如果弦长为75,则将翼型放大75倍就可以了。最后大家就可以打印了。
我认为重要的关键点有:
1,导入点的坐标分为上翼面和下翼面的,若导入时上翼面横坐标是从小到大的,那么下翼面的横坐标就要从大到小,就像我们小时候玩一笔画成图的游戏一样,不然CAD导出来的图线就很乱。因为你的横坐标的点是跳着的。
2,有可能翼型坐标点中没有纵坐标为零的点,导致我们画出来的翼型尾部就像鱼尾巴,所以这时候就自己看着编一个纵坐标为零的点,这样就好了。祝好运。
㈢ txt格式数据怎么导入2007cad
1.首先TXT的坐标文件。
2.此处使用的工具是landcad工具,使用拐点工具导入拐点。
3.在弹出窗口中,选择坐标文件。
4.然后它将弹出并导入完成的提示窗口。
㈣ CAD中怎么导入导出文本
CAD中怎么导入导出文本
在使用CAD绘图软件进行工作时,有时需要把用文字编辑器写好的段落文字插入到图形中,并用CAD的文字编辑命令进行修改;但CAD中并没有直接提供关于文本插入和文本输出的命令,遇到这样的问题该怎么办?通过剪贴板进行OLE方式的复制与粘贴是无法实现上述要求的。下面我介绍的方法能够解决在CAD与文字编辑器之间进行纯文本的导入和导出的问题。
1. 导入文本
虽然CAD中没有提供插入文本的命令,但是利用多行文字编辑Mtext可以实现文本插入。在Mtext的`对话框中右键菜单中有“输入文字”的功能,可以选择磁盘上的“.txt”、“.rtf”格式的文件进行插入,注意插入文件大小不得超过16KB,这显得美中不足。还有一种比较麻烦的方法就是利用文字编辑软件先打开文本,然后在输入单行文字或多行文字的时候将文字内容复制粘贴到CAD中。CAD还可以将默认的文字编辑器设置为记事本或WORD,设置方法如下:
1、 在选项对话框中设置。输入OP命令,打开选项对话框,在“文件”选项卡中找到文本编辑器应用程序,可以浏览设置成记事本、WORD的执行文件。
2、 直接输入mtexted命令,回车,输入notepad,可以将编辑器设置成记事本,如果想设置回来,输入mtexted,回车,输入“.”,回车,就可以回复为CAD默认的编辑器。
如果要导入文本,无论是粘贴、插入,实际上都不太复杂,改变编辑器一般人很少用。
2. 导出文本
如果仅有少量文字需要导出,那么在单行和多行文字的编辑框中,选择文字进行复制,然后粘贴到文字编辑器中即可。但是如果图纸中有大量散落的文字需要导出,上述方法就不太适用了。下面给大家介绍两个在网上看到的小程序,可以快速将CAD中的单行文字输出为文本文件(*.csv),这个文件用记事本或EXCEL都可以打开。
A、选择文字输出
可以框选文字进行输出,自动将文字保存为*.csv。
(defun c:exx ( / &ss %fir ~fir @tex #si #sn &tex %lay %tex @cl %ctx )
(vl-load-com) (princ " 请选择要输出的文字对象")
(if (setq &ss (ssget (list (cons 0 "TEXT"))))
(progn
(setq %fir (strcat "C:\" (vl-filename-base (getvar "dwgname")) ".csv") ~fir (open %fir "w"))
(repeat (setq @tex '() #si 0 #sn (sslength &ss))
(setq &tex (vlax-ename->vla-object (ssname &ss #si)) #si (1+ #si))
(setq %lay (vla-get-layer &tex) %tex (vla-get-textstring &tex))
(if (setq @cl (assoc %lay @tex))
(setq @tex (subst (append @cl (list %tex)) @cl @tex))
(setq @tex (cons (list %lay %tex) @tex))
)
)
(setq @tex (vl-sort @tex (function (lambda (a b) (> (length a) (length b))))))
(setq #si 0 #sn (length (car @tex)))
(setq @tex (vl-sort @tex (function (lambda (a b) (< (car a) (car b))))))
(repeat #sn
(setq %tex "")
(foreach @tx @tex
(if (null (setq %ctx (nth #si @tx))) (setq %ctx "") )
(if (/= %tex "")
(setq %tex (strcat %tex "," %ctx))
(setq %tex %ctx)
)
)
(write-line %tex ~fir) (setq #si (1+ #si))
)
(close ~fir) (vlax-release-object &tex)
(princ (strcat " 成功输出 " (itoa (sslength &ss)) "个文字输出到 " %fir " 中."))
)
(princ " 未选择文字对象,退出.")
)
(princ)
)
将上面代码复制到记事本中,另存为exx.lsp,在CAD中输入AP命令,加载exx.lsp,加载成功后,在命令行输入EXX,回车,在图中框选要输出的单行文字即可。
B、输出同图层文字
可以选择图层上的一个单行文字,就可以将此图层上所有单行文字都输出为一个*.csv文件。
(defun c:ecx ( / &tex &ss %fir ~fir %lay #si #sn )
(if (null vlax-mp-object) (vl-load-com) )
(if (setq &tex (entsel " 请选择要输出图层的文字对象: "))
(if (= (vla-get-objectname (setq &tex (vlax-ename->vla-object (car &tex)))) "AcDbText")
(progn
(setq %fir (strcat "C:\" (vl-filename-base (getvar "dwgname")) ".csv") ~fir (open %fir "w"))
(setq %lay (vla-get-layer &tex) &ss (ssget "X" (list (cons 0 "TEXT") (cons 8 %lay))))
(repeat (setq #si 0 #sn (sslength &ss))
(write-line (vla-get-textstring (vlax-ename->vla-object (ssname &ss #si))) ~fir)
(setq #si (1+ #si))
)
(close ~fir) (vlax-release-object &tex)
(princ (strcat " 已输出图层 [" %lay "]中的 " (itoa #sn) " 个文字到文件 " %fir "中."))
)
(princ " 选择的不是文字对象.")
)
(princ " 未选择对象.")
)
(princ)
)
将上面代码复制到记事本中,另存为ecx.lsp,在CAD中输入AP命令,加载ecx.lsp,加载成功后,在命令行输入EcX,回车,在图中点取一个要输出图层上的单行文字即可。
;