转义

[广州]阿浪(157636945)  16:28:39
delphi &符号怎么输出啊?
[广州]阿浪(157636945)  16:30:00
delphi &符号怎么输出啊?
有没有转义符这类的
[天河]james(405095979)  16:33:05
？？
想输出给别人用？
[广州]阿浪(157636945)  16:33:36
比如我要输出 'ac=aa&b=1'

这样是不行的
[天河]james(405095979)  16:33:35
作个 HTTP的转义吧。
[广州]阿浪(157636945)  16:33:42
是啊.
我要用idhttp 作post的数据
[天河]james(405095979)  16:34:23
哦。这个用下吧：
function HttpPassWordEncode(const AStr: string): string;
const
  // 不转义字符集
  NoConversion = ['0'..'9', 'A'..'Z', 'a'..'z'];
var
  Sp, Rp: PChar;
begin
  SetLength(Result, Length(AStr) * 3);
  Sp := PChar(AStr);
  Rp := PChar(Result);
  while Sp^ <> #0 do
  begin
    if Sp^ in NoConversion then
      Rp^ := Sp^
    else
      if Sp^ = '   ' then
        Rp^ := '+'
      else
      begin
        FormatBuf(Rp^, 3, '%%%.2x', 6, [Ord(Sp^)]);
        Inc(Rp, 2);
      end;
    Inc(Rp);
    Inc(Sp);
  end;
  SetLength(Result, Rp - PChar(Result));
end;


！@#￥%&*（）——+}{、 都可以有转义了。
转成跟java 类的一样