snrg.net
当前位置:首页 >> DElphi utF8touniCoDE >>

DElphi utF8touniCoDE

//unicode转字ASC function U2GB(Str: string): string; var s: pchar; i: integer; tmp: string; begin tmp := ''; result := ''; s := PChar(str); i := 0; while i < length(s) do begin tmp := tmp + chr(HexToInt(s[i + 2] + s[i + 3])) + ...

delphi7中不支持。 用windows自带的记事本程序打开文件,然后在菜单中选择“另存为”,并在弹出窗口的编码选择中选择“unicode”。

根据实际情况用代码进行转换吧。

用 UnicodeToUtf8(); 转成UTF8字符串,然后 再用 Utf8ToAnsi(); 得到GB2312 具体使用方法请参考帮助

这就要从字符集的概念开始说起 DELPHI7用的是ANSI编码,这是和操作系统的区域设置有关的,例如你是中文系统,那么你的字符集就是GBK GBK虽然是中文字符集,但不代表就完全只有中文字符,它也有一定的外语文字,例如日文,但这是在GBK字符集环境...

//在delphi2007中通过 var wStr: wideString; begin wStr := widechar($4F60); ShowMessage(wstr); end; //在delphi2009中通过 var wStr: String; begin wStr := char($4F60); ShowMessage(wstr); end;

//机内码 -> 汉字 Function MacCode2Chinese(AiUniCode : Integer) : String; Var ch, cl : Integer; Begin ch := AiUniCode Div 256; cl := AiUniCode Mod 256; Result := Chr(ch) + Chr(cl); end; //汉字 -> 机内码 Function Chinese2MacCode(...

默认字符为UNICODE支持是delphi2007版以后 delphi2007是最后一个默认字符为ASCII的版本

你这样处理一下试试: s1:String ...... s1:=#$28408; ShowMessage(s1);

D7没有SaveToFile(FileName,Encodeing)这样的,需要将ansi转成unicode, function AnsiToUnicode(s:string):WideString; var lpWideChar:PWideChar; len:Integer; begin len := ( Length(s) + 1 ) * 2; GetMem(lpWideChar, len); ZeroMemory(lpW...

网站首页 | 网站地图
All rights reserved Powered by www.snrg.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com