㈠ 怎樣把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,回車,在圖中點取一個要輸出圖層上的單行文字即可。
;