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

將字碼轉換至文字

 
ddy
站務副站長


發表:262
回覆:2105
積分:1169
註冊:2002-07-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-02-24 16:44:32 IP:61.218.xxx.xxx 未訂閱
沒有技術,可做為備忘 應用:多國語言    
var
    wordNo,wordHi,wordLo:integer;
begin
    wordNo:=$a5e7;
    wordLo:=wordNo and $ff;    //取得低位元
    wordHi:=wordNo shr 8;       //取得高位元
    memo1.Text  :=char( wordHi )+ char( wordLo );
end;
bookworm
中階會員


發表:63
回覆:161
積分:82
註冊:2002-08-03

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-02-24 23:14:40 IP:210.85.xxx.xxx 未訂閱
可不可以再講白一點該怎麼用 @@ 謝謝! ======================= 二星級新手,問基礎問題請勿見笑 ^^
ddy
站務副站長


發表:262
回覆:2105
積分:1169
註冊:2002-07-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-02-25 00:51:20 IP:211.74.xxx.xxx 未訂閱
你可以將此段程式碼寫成function,例
function code2txt(icode:integer):string;
var    
   wordHi,wordLo:integer;
begin    
   wordLo:=icode and $ff;    //取得低位元
   wordHi:=icode shr 8;       //取得高位元 
   result:=char( wordHi )+ char( wordLo );
end;    
有時候…我們以ini 檔來實現多國語言 在繁體/簡體/unicode 時都以"文字"來儲存,儲存簡體時會出現亂碼 這時候也可以選擇以"文字碼"儲存,讀進程式後,再以此function 將文字碼組合成文字 或是url 字串裡中文字被拆成"字碼",也是可以利用此function 將url 讀入分析 發表人 - ddy 於 2003/02/25 00:52:15
rexchiu
中階會員


發表:14
回覆:88
積分:70
註冊:2002-03-17

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-09-03 17:36:42 IP:211.74.xxx.xxx 未訂閱
請問此方法可用來處理Unicode 的字碼嘛?? 例如 $4E2D 為unicode 的"中". Best Regards, Rex Chiu
------
Best Regards,
Rex Chiu
系統時間:2024-04-26 15:20:25
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!