я пишу следующий код для отправки строки Unicode на веб-сервер
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
в чем проблема?
спасибо.