線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1962
推到 Plurk!
推到 Facebook!

用Memo的savetofile功能把檔案 存在簡体目錄時會失敗

缺席
mihopaul
一般會員


發表:25
回覆:59
積分:16
註冊:2002-03-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2012-01-06 18:30:49 IP:203.73.xxx.xxx 訂閱
你好

寫了一個小程式,上面只有一個 SaveDialog , 一個Memo ,一個button, 目的是按下button後把memo的內容存成一個文字檔
一般來說沒什麼問題,不過當要存的目錄是簡體字,或是有 [ " ]就會出錯,用了支持 unicode的控件
好像也沒什麼用,請問各位大大有什麼方法可解決嗎,謝謝你的閱讀。

void __fastcall TForm1::Button1Click(TObject *Sender)
{

TntSaveDialog1->Filter = "Log File(*.txt)|*.txt|All File(*.*)|*.*";

if (TntSaveDialog1->Execute())
{
AnsiString sFileExt;
AnsiString sFileName;

sFileName = TntSaveDialog1->FileName;
sFileExt = ExtractFileExt(sFileName);
if (sFileExt == "")
sFileName = sFileName ".txt";

TntMemo1->Lines->SaveToFile(sFileName); <-------------Fail here!!!
}
}




mihopaul
一般會員


發表:25
回覆:59
積分:16
註冊:2002-03-17

發送簡訊給我
#2 引用回覆 回覆 發表時間:2012-01-06 19:20:38 IP:202.154.xxx.xxx 訂閱
Sorry 自問自答^^"""

AnsiStrings FileName;
改成
WideString sFileName;
就可

不過元件仍然得使用 TNT而不是BCB內定的。

FYR
系統時間:2017-12-13 1:40:41
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!