Question

在delphi中怎样对字符串进行urlencode编码

Answer 1

在 IdURI 单元提供了 URLEncode 和 URLDecode 函数，以下是示例代码：

uses IdURI;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit3.Text := TIdURI.URLDecode(Edit2.Text);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  Edit2.Text := TIdURI.URLEncode(Edit1.Text);
end;

运行截图：