[xo6a]

Проблема такая:
есть сайт (урл)
в тексте сайта есть кусок текста, который нужно сохранить в файл.
я это делаю нижеследующим образом но апострофы и другие спец символы сохраняются с ошибками

Примеры:

имеем на сайте / сохранили в файл
1)
Canada’s participation
Canada’s participation
2)
une base d’opérations avancée du district
une base d’opérations avancée du district

Как сделать так чтобы "кусок" сохранялся нормально?


Как делаю я:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13

var   grab_info:string; begin       url:='http://www.siteurl.ru/';       grab_info:=IdHTTP1.Get(url); //функция вырезает текст из нужного тега       grab_info:=Pars('class="photo-desc">',grab_info,'</div>');        SaveFileName:='info.html';       AssignFile (f,SaveFileName);       Rewrite(f);       WriteLn(f,grab_info);       CloseFile(f); end;