Информер погоды

[Stanislav]

Здравствуйте...
у меня такая проблемка при написании погодного информера необходимо со строки:
<description>пасмурно, небольшой дождь, температура +20..+22 С, давление 740..742 мм рт.ст., ветер Восточный, 1 м/с</description>

взять температуру +20..+22 С (в данном случаи) я уже перебровал что смог с pos не дружится что-то...

Я был бы очень благодарен если вы поможете небольшим примером.

[NikLik]

uses 
...StrUtils;
procedure TForm1.Button1Click(Sender: TObject);
var pos1,pos2:byte;
t:string;
begin
memo1.lines.add('<description>пасмурно, небольшой дождь, температура +20..+22 С, давление 740..742 мм рт.ст., ветер Восточный, 1 м/с</description>');
pos1:=pos('температура ',memo1.Lines[1])+12;//12--это длина строки //'температура '
pos2:=posex(' С',memo1.Lines[1],pos1)+2;//2-- длина строки ' C'
t:=copy(memo1.Lines[1],pos1,pos2-pos1);//искомая строка
memo1.Lines.add(t);
end;

[Stanislav]

Сообщение от NikLik

uses 
...StrUtils;
procedure TForm1.Button1Click(Sender: TObject);
var pos1,pos2:byte;
t:string;
begin
memo1.lines.add('<description>пасмурно, небольшой дождь, температура +20..+22 С, давление 740..742 мм рт.ст., ветер Восточный, 1 м/с</description>');
pos1:=pos('температура ',memo1.Lines[1])+12;//12--это длина строки //'температура '
pos2:=posex(' С',memo1.Lines[1],pos1)+2;//2-- длина строки ' C'
t:=copy(memo1.Lines[1],pos1,pos2-pos1);//искомая строка
memo1.Lines.add(t);
end;

Спасибо большое только я так понимаю Lines[0]...... в данном случаи?

[NikLik]

Да, ты прав.
ЗЫ это просто пример