Delphi操作UTF-8转码HTTPEncode

chelen_jak

于 2018-05-04 17:21:41 发布

阅读量3k

点赞数

分类专栏： Delphi 实用

实用同时被 2 个专栏收录

738 篇文章

订阅专栏

Delphi

59 篇文章

订阅专栏

本文介绍了如何在Delphi中实现URL编码与解码的方法，包括使用UTF8Encode和HTTPDecode函数来确保编码与标准url_encode()一致，避免查询结果出现偏差。同时，也提供了如何正确处理编码后的字符串以避免乱码问题。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

原文出处： https://www.cnblogs.com/ckcai/archive/2012/11/14/2769322.html

引用单元 ;HttpApp

procedure TForm1.Button1Click(Sender: TObject);
var
  Str: WideString;
  http: AnsiString;
begin
  Str := Memo1.Text;
  http := HTTPEncode(UTF8Encode(Str));
  Memo2.Text := http;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  Str: WideString;
  http: AnsiString;
begin
  Str := Memo2.Text;
  http := UTF8Decode(HTTPDecode(Str));
  Memo1.Text := http;
end;