如何使用 indy10 Delphi 發送西里爾文數據

Question

當我在 web 站點中發送一些西里爾文文本時，該文本顯示為“?????????”....這是我發送的 function：

http := TIDHttp.Create(nil);
http.HandleRedirects := true;
http.ReadTimeout := 5000;
http.Request.ContentType:='multipart/form-data';
param:=TIdMultiPartFormDataStream.Create;
param.AddFormField('adtitle','Текст на кирилица');
param.AddFormField('area','Текст явергсдфсдфадфас');
http.Post('http://www.example.com/',param);

Answer 1

試試這樣：

param.AddFormField('adtitle', 'Текст на кирилица', 'utf-8').ContentTransfer := '8bit';
param.AddFormField('area', 'Текст явергсдфсдфадфас', 'utf-8').ContentTransfer := '8bit';