D
DarkAngelGG
Unregistered / Unconfirmed
GUEST, unregistred user!
Delphi中获得中文编码的例子,请问在VC中应当如何实现?
var
str: WideString;
t: string;
begin
str := Memo1.Text;
FmtStr(t, '%.4X', [Ord(str[1])]);
ShowMessage(t);
end;
var
str: WideString;
t: string;
begin
str := Memo1.Text;
FmtStr(t, '%.4X', [Ord(str[1])]);
ShowMessage(t);
end;