Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2014.02.16;
Скачать: CL | DM;

Вниз

idhttp проблема с кодировкой   Найти похожие ветки 

 
NBAH1990   (2013-04-13 07:22) [0]

Windows 7, Delphi XE3

Добрый день. Подскажите что я делаю не так.
begin
 s1:="Privet";
 s2:="Привет";
 s3:=idhttp1.URL.PathEncode("Привет");
 st:="https://stat.g-net.local/support/clo_naryad.mns?act=1&uid=4276&des_nar="+s1+s2+s3+"&dat_clo_dat=11.04.2013&dat_clo_tim=09:45:39&submit=Закрытие наряда";
 IdHTTP1.Get(st);
end;

отсылаю 3 разных строки в одно поле, для проверки. С английскими буквами проблем нет. А вот русские никак не хотят нормально отображаться. Кодировка на сайте windows-1251.
Через Get отсылаю для наглядности.

в общем на сайте это в итоге выглядит как:

Privet??????Привет

Т.е. верно уходят только американские буквы. Есть ещё варианты?


 
NBAH1990   (2013-04-13 07:41) [1]

Проблему решил хитрым путём, вычитал на одном из форумов.

 var str: TStringStream;
begin
 IdHTTP1.Request.ContentType:="application/x-www-form-urlencoded";
 str:= TStringStream.Create;
 str.WriteString("act=1&uid=4276&des_nar=Привет&dat_clo_dat=11.04.2013&dat_clo_ti m=09:45:39&submit=Закрытие наряда");
 IdHTTP1.Post("https://stat.g-net.local/support/clo_naryad.mns",str);
 str.Free;
end;



Страницы: 1 вся ветка

Текущий архив: 2014.02.16;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.005 c
2-1366331872
novai
2013-04-19 04:37
2014.02.16
перекрыть WindowProc


2-1366640331
delphistorm
2013-04-22 18:18
2014.02.16
ошибка при загрузке xml в TXMLDocument


2-1366598777
mk26
2013-04-22 06:46
2014.02.16
Как переместить фаилы из одной папки в другую..


2-1366377417
mefodiy
2013-04-19 17:16
2014.02.16
Не удаляется значение ключа реестра


2-1366897985
HDC
2013-04-25 17:53
2014.02.16
отрисовка текста через TCanvas