httpencode 需要 参数被ansitoutf8

urlencode 不需要  参数被ansitoutf8      多谢了。 终于把这两个 搞清处了 

 

 

procedure TForm9.Button1Click(Sender: TObject);
var a,b,c:string; i,j,k:integer;
begin


//http://www.baidu.com/s?ie=utf-8&f=8&rsv_bp=1&tn=baidu&wd=%E5%95%8A%E5%95%8A%E5%95%8A&rsv_enter=0&rsv_sug3=4&rsv_sug4=149&rsv_sug1=3&inputT=1923

a:='啊啊啊';
a:=utf8encode(ansistring(a));

c:=DSAzure.TAzureService.URLEncode(a);
a:='啊啊啊';
b:=HttpEncode(ansitoutf8(a));

showmessage(b);
//self.EmbeddedWB1.Navigate() ;

end;