怎样把英文字符与中文转换成UNICODE格式? 找财务记账软件哪个好
2楼: 不是有widestring吗 如酒店管理软件破解版
3楼: StringToWideChar
其实在delphi自动转换的
比如你定义一个string和Widestring,直接赋就可以了
4楼: 不是这个,是unicode格式的编码
5楼: http://www.delphibbs.com/keylife/iblog_show.asp?xid=14470
6楼: 前面回答的也是"unicode格式的编码"。
库存管理软件版7楼: 默认情况是使用AnsiString的
你再定义一个WideString类弄的变量
然后WStr:=WideSTring(astr);就搞定了
8楼: 都在亂說一氣,英文字符与中文转换成UNICODE格式是需要轉換對照表的,不是想轉換就轉換的,比如 。 符號應轉換為英文的 . 符號還是別的什么符號,這需要你自己設計算法來實現的。
GB3212 和 Unicode 或 UTF8 都有各自的碼表,你要完全清楚,並比較它們的異同,才能設計出好的轉換軟件。
9楼: 151:其实我不需要转中文的,只是需要把指定的URL转成UNICODE编码,是不是就没这么复杂?您说的这些转换表哪里有?能不能给我指点一下,谢谢!
10楼: WideString(str)
11楼: MultiByteToWideChar和WideCharToMultiByte
这两个函数自己查一下MSDN
12楼: AnscII to Utf8 如财务记账软件哪个好
13楼: to l51
同意
库存管理软件版14楼: // string to PwideChar
function TEditGridColumn.StrToPWideChar(str: String): PWideChar;
var
pwc: PWideChar;
begin
GetMem(pwc, Length(str) * Sizeof(PwideChar) + 1);
result := StringToWideChar(str, pwc, Length(str) * SizeOf(WideChar) + 1);
end;
//是unicode码。在delphi中可以用如下函数转换。
//UniCode -> 汉字
function UniCode2Chinese(AiUniCode : Integer) : String;
var
ch, cl : string[3];
s : string;
begin
s := IntToHex(AiUniCode, 2);
cl := ''$'' + Copy(s, 1, 2);
ch := ''$'' + Copy(s, 3, 2);
s := Chr(StrToInt(ch)) + Chr(StrToInt(cl)) + #0;
Result := WideCharToString(pWideChar(s));
end;
//汉字 -> UniCode
function Chinese2UniCode(AiChinese : String) : Integer;
var
ch, cl : string[2];
a : array [1..2] of char;
begin
StringToWideChar(Copy(AiChinese, 1, 2), @(a[1]), 2);
ch := IntToHex(Integer(a[2]), 2);
cl := IntToHex(Integer(a[1]), 2);
Result := StrToInt(''$'' + ch + cl);
end;
15楼: 看看這個鏈接吧,不要告訴我你不喜歡看陰文,呵呵,我也不喜歡,但是你如果不看的話,就放棄編程吧,因為不看英文的人不適合編程行業。
http://www.unicode.org/onlinedat/resources.html#5
16楼: 多人接受答案了。