在Delphi4中如何把ANSI串转换为Unicode?

[Putao]

看了很多过去的帖子,还是不明白.

比如:
!@#$%^&*()ABCD1234567890abcd
转换后应是:
%21@%23%24%25%5E%26*%28%29ABCD1234567890abcd

听说要用MultiByteToWideChar和StringToWideChar,
但不知怎么用?

[Putao]

最好有范例

[y1g1y1]

vb 的贴子,看看:

http://www.csdn.net/expert/Topic/43388.shtm

[项目张雪峰之巅]

关注

[gxdq]

guanzhu

[david_lirihui]

Delphi自己就提供了这个函数呀！StringToWideChar就是把一个ANSI串改为UNICODE串呀！此函数定义如下：function StringToWideChar(const Source: string; Dest: PWideChar; DestSize: Integer): PWideChar;(注：PWideChar即为UNICODE串）如果想具体的看如何实现可以去看Delphi提供的原码。其所在的UNIT为system.pas.

[windindance]

直接把AnsiString赋给WideString就可以了
var
AnsiS:AnsiString;
WideS:WideString;
being
WideS:=AnsiS;
end;

[Putao]

我自己已经解决了.
不过还是要谢谢大家!
分数就分掉吧