
06.11.2011, 00:21
|
Начинающий
|
|
Регистрация: 27.09.2011
Сообщения: 158
Репутация: 10
|
|
Скачивал я так
Код:
GetDir(0,s);
memo2.Text:=Utf8ToAnsi(IdHTTP1.Get('http://xml.weather.co.ua/1.2/forecast/19?dayf=5&userid=yoursite_com'));
Memo2.Text:=Memo1.Text + Memo2.Text + Memo3.Text ;
Memo2.Text:=Replace(Memo2.Text,'<?xml version="1.0" encoding="UTF-8"?>','');
Memo2.Lines.SaveToFile(s+'\1.xml');
|