Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > ответ сокета в UTF-8

Автор: sashas1 6.2.2008, 23:15

Вообщем. через сокеты конекчусь к сайту, и запросом GET получаю код страницы, но он выходи в кодировке UTF-8
Как можно сделать чтоб я запрашивал в кодировке cp-1251?
Вот код GEt'а

Код


form2.messa.Socket.SendText('GET /index HTTP/1.1'#13#10+
  'Accept: */*'#13#10+
  'Referer: http://site.ru/login.php'#13#10+
  'Accept-Language: ru'#13#10+
  'Content-Type: application/x-www-form-urlencoded'#13#10+
  'User-Agent: Mozilla/4.0'#13#10+
  'Host: site.ru'#13#10+
  'Connection: Keep-Alive'#13#10+
  'Cache-Control: no-cache'#13#10+
  'Cookie: '+cook+#13#10#13#10);

где cook это переменная с куками, messa - сокет. site.ru - адресс сайта