delphi 网上获取北京时间IdHTTPServer and IdHTTP 使用 Encoding UTF8

本文整理自网络，侵删。

 
IdHTTP1.Get('http://localhost/?msg=' + TIdURI.ParamsEncode('中国人'));
 
AResponseInfo.ContentType := 'text/plain';
AResponseInfo.CharSet := 'utf-8';
AResponseInfo.ContentText := '中国人';
Or:
 
AResponseInfo.ContentType := 'text/plain; charset=utf-8';
AResponseInfo.ContentText := '中国人';
 
procedure TForm1.OnCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
  msg: string;
begin
  msg := ARequestInfo.Params.Values['msg'];
  TThread.Synchronize(nil,
    procedure
    begin
      Memo1.Lines.Add(msg);
    end
  );
  ...
end;
 

相关阅读 >>

Delphi 解决webbrowser不能复制的问题

Delphi 数组类型与数组指针的巧妙利用

Delphi下pos机控制钱箱,客显,打印机

Delphi真正实现延时暂停功能

Delphi 使用google translate实现tts

Delphi 如何识别应用程序没有响应

如何在Delphi xe中通过ftp下载文件

Delphi多线程学习：多线程数据库查询（ado）

Delphi xe6调用android标准功能

Delphi cxgrid使用小结

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 网上获取北京时间IdHTTPServer and IdHTTP 使用 Encoding UTF8