Вчера перешёл на новую версию индей (последнюю из репозитория ихнего). И сразу же столкнулся с проблемой - весь русский текст (на странице написано, что он есть в кодировке win-1251) стал приходить знаками вопроса. Раньше такой проблемы не было. Как конвертировать эти вопросы в читабельные символы?
проблема частично решена, но вот от чего она появилась? среда разработки - delphi 7.
проблема была с таким.
| Код |
s:=http.get('http://vkontakte.ru/mail.php');
|
заменил на такое.
| Код |
function getpage(pg:string):string;
var sl:tstringlist;ss:tstringstream;
begin
ss:=tstringstream.create('');
http.get(pg,ss);ss.position:=0;
sl:=tstringlist.create;sl.loadfromstream(ss);result:=sl.text;
freeandnil(ss);freeandnl(sl);
end;
....
s:=getpage('http://vkontakte.ru/mail.php');
|
Всё работает. Но всё же интересно, из-за чего вдруг возникло? |