| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Кроказябры в Post-Запросе.

Страницы:   < 1 2 >

Иван Д. ©   (2015-09-07 08:56:00) 

Есть база данных MySQL в которой хранятся, в частности, русскоязычные записи, кодировка - cp1251_general_ci. Есть php-скрипт, через который Delphi-программа считывает данные с БД. Сама Delphi-программа делает запрос так:
Var Str:TStringList;
   Url:String;
   S:String;
S:= IdHTTP1.Post(Url,Str);
Memo1.Lines.Add(S);

На Delphi7 все работало нормально, в Memo1 выводились русские буквы. На Delphi XE5 вместо русских букв видны кроказябры. Что нужно изменить в коде Delphi XE5, чтобы решить проблему?
Заранее спасибо!

---

Иван Д.   (2015-09-07 10:26:00) [21]

Спасибо, попробую разобраться!

---

кгшзх   (2015-09-07 10:23:00) [22]

а потом смотри на изменившийся пост

   function Post(AURL: string; const ASourceFile: String
     {$IFDEF STRING_IS_ANSI}; ADestEncoding: IIdTextEncoding = nil{$ENDIF}
     ): string; overload;

---

кгшзх   (2015-09-07 10:08:00) [23]

смотри в какой кодировке приходят данные из похапе

---

Иван Д.   (2015-09-07 09:53:00) [24]

Var Str:TStringList;
  Url:AnsiString;
  S:AnsiString;
S:= IdHTTP1.Post(Url,Str);
Memo1.Lines.Add(S);
Результат не изменился.

---

sniknik   (2015-09-07 09:47:00) [25]

для начала AnsiString везде поставь (раз на D7 работала то логично, что там не юникод)

---

Страницы:   < 1 2 >

Наверх