2010-08-01 21 views
0

我試圖加載文件時,它從/ STEXT命令行創建之後,但它不是裝載了如何加載文本文件的/ STEXT出來放到memo1

我的代碼

ShellExecute(0, nil, PChar(path+'test.exe'), PChar('/stext "' + path + 'save.txt"'), nil, SW_HIDE); 

它創建的文件後,我試圖加載從另一個按鈕memo1點擊

procedure TForm1.Button2Click(Sender: TObject); 
begin 
Memo1.Lines.LoadFromFile(path+'save.txt'); 
end; 

但它的加載一些不明N 3個字符

ÿþ= 

P.S:我手動打開它有30行:)

爲什麼它發生的真實數據?

還有一件事是在我執行我的第一個命令的ShellExecute我怎麼知道該文件的創建是爲了加載到我在同樣的功能備忘錄不使用睡眠功能:S

在此先感謝

對於

回答

0

嘗試,看看這是否正常工作

procedure TForm1.Button2Click(Sender: TObject); 
begin 
    Memo1.Lines.LoadFromFile(path+'save.txt', TEncoding.UTF8); 
end; 

因爲你貼我想的第一個字符是從UTF8編碼。

此外,要仔細檢查它是否是編碼。嘗試在記事本中打開該文件,看看它是否正常。

+0

沒有工作,是的,我打開記事本它有30行的實際數據。 – steve0 2010-08-01 20:17:11

+0

TEncoding.Unicode怎麼樣? – zz1433 2010-08-01 20:29:34

+0

還沒有運氣:( – steve0 2010-08-01 20:42:58

相關問題