问一下，什么方法可以把字符串"猴子"变为"%BA%EF%D7%D3"？

Question

列举一下
猴子 %BA%EF%D7%D3
猪头 %D6%ED%CD%B7
老大!  %C0%CF%B4%F3%21特殊的：各种字符都有
我有13块  %CE%D2%D3%D013%BF%E9

Answer 1

这个就是把非ascii码的数据用%加16进制输出而已
你处理你的字符串，每次1个字节，发现大于127就输出%ce这样的，不大于127就原样输出

Answer 2

在www.baidu.com中的搜索关键字输入的地方就可以。输入后点一下搜索。在地址栏中就可以看到。

Answer 3

function UTF8Encode(const ASrc: string): string;
const
UnsafeChars = ['*', '#', '%', '<', '>', '+', ' ']; {do not localize}
var
i: Integer;
begin
Result := ''; {Do not Localize}
for i := 1 to Length(ASrc) do begin
if (ASrc[i] in UnsafeChars) or (ASrc[i] >= #$80) or (ASrc[i] < #32) then begin
Result := Result + '%' + IntToHex(Ord(ASrc[i]), 2); {do not localize}
end else begin
Result := Result + ASrc[i];
end;
end;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Caption:= UTF8Encode('猪头');
end;

Answer 4

delphi 6里的fastNet面版有个nmURL的控件.可以实现这种转换,并且可以双向转换.
var
st:string;
begin
nmurl1.InputString:='猴子';
st:nmurl1.Decode:
end;