[Gudzik11]

Здравствуйте !
Парсил с помощью ECXMLParser

Код:

 procedure TForm1.Create(Sender: TObject); //Погода
   var
  s: string ;
    procedure DrawXMLItem(XMLItem: TXMLItem);
var
  i : Integer ;
 begin
   for i := 0 to XMLItem.SubItemCount-1 do
      DrawXMLItem(XMLItem.SubItems[i]);
   if Trim(XMLItem.Text)<>'' then  Memo1.Lines.Add(XMLItem.Name+' : '+XMLItem.Text);

 end;

    begin
      GetDir(0,s);                   //получить текущюю деректорию

      IdHTTP1.HandleRedirects:=True;
      Memo1.Clear();        // очищяем memo1
      Memo1.Text:= IdHTTP1.Get('http://sinoptik.ua/'+UTF8Encode('погода-харьков/10-дней')); // Загружаем страницу
      Memo1.Text:=Replace(Memo1.Text,'&deg;','');
      Memo1.Text:=Replace(Memo1.Text,'&nbsp;','');
      Memo1.Lines.SaveToFile(s+'\fff.htm'); // сохроняем
      Memo1.Clear;
      ECXMLParser1.LoadFromFile('fff.htm');
      Memo1.Lines.BeginUpdate;
      DrawXMLItem(ECXMLParser1.Root);
      Memo1.Text:= Utf8ToAnsi(Memo1.text);
      Memo1.Lines.EndUpdate;
     
       end;

получил в мемо такой текст

span : 10 дней
span : выбрать другой город
span : скрыть
span : скрыть
a : Среда
p : 11
p : апреля
span : +5
div : мин.
span : +9
div : макс.
a : Четверг
p : 12
p : апреля
span : +3
div : мин.
span : +15
div : макс.
a : Пятница
p : 13
p : апреля
span : +7
div : мин.
span : +17

подскажите пожалуйста как мне вытаскивать теперь значения
к примеру из span : вывести значение +15 в Label