次のコードを記述して、Unicode文字列をWebサーバーに送信します
procedure TForm1.Button1Click(Sender: TObject);
var
f2 : TStringStream;
str1, str2 : string;
str3 : WideString;
begin
f2 := TStringStream.Create('');
str1 := ('مهر');//Persian character (Unicode);
str2 := ('آذر');//Persian character (Unicode);
str3 := str2;
IdHTTP1.Get('http://mehratin.heroku.com/personals/add_item?fn=' + str1 + '&ln=' + str3, f2);
Caption := f2.DataString;
end;
データは保存されますが、「?」と表示されます 。データを見ることができます:http://mehratin.heroku.com/personals
何が問題ですか?
ありがとう。