原創(chuàng)|其它|編輯:郝浩|2013-01-08 10:44:03.000|閱讀 985 次
概述:將文本樣式的Unicode屬性設(shè)置為True(注意:改變屬性時(shí)文本必須為空),就能啟動(dòng)Unicode編碼。本示例顯示如何用代碼的形式加載TRichView Unicode UTF-8文件。
# 界面/圖表報(bào)表/文檔/IDE等千款熱門軟控件火熱銷售中 >>
在 TRichView 中運(yùn)用Unicode進(jìn)行編碼,有利于簡(jiǎn)化軟件的本地化并改進(jìn)多語(yǔ)言文本進(jìn)程,防止數(shù)據(jù)損失。但TRichView中不是所有字符串都是Unicode碼制,這取決于文本樣式的 Unicode屬性,文本可能是Unicode也有可能是ANSI,也可能是兩者混搭。將文本樣式的Unicode屬性設(shè)置為True(注意:改變屬性時(shí)文本必須為空),就能啟動(dòng)Unicode編碼。下面這個(gè)示例顯示如何用代碼的形式加載TRichView Unicode UTF-8文件:
procedure LoadUTF8(rv: TCustomRichView; const FileName: String; StyleNo, ParaNo: Integer); var Stream: TFileStream; s: TRVRawByteString; ws: TRVUnicodeString; begin Stream := TFileStream.Create(FileName, fmOpenRead); SetLength(s, Stream.Size); Stream.ReadBuffer(PRVAnsiChar(s)^, Stream.Size); Stream.Free; rv.Clear; ws := UTF8Decode(s); rv.AddTextNLW(ws, StyleNo, ParaNo, ParaNo, False); end;
調(diào)用:
LoadUTF8(RichViewEdit1, 'test.txt', 0, 0); RichViewEdit1.Format;
值得一提的是,Delphi/C++Builder 2009和更高的版本,Unicode屬性默認(rèn)值為True。
本站文章除注明轉(zhuǎn)載外,均為本站原創(chuàng)或翻譯。歡迎任何形式的轉(zhuǎn)載,但請(qǐng)務(wù)必注明出處、不得修改原文相關(guān)鏈接,如果存在內(nèi)容上的異議請(qǐng)郵件反饋至chenjj@fc6vip.cn
文章轉(zhuǎn)載自:慧都控件