Поиск и вставка

[Fizerator]

Здравствуйте уважаемые программисты
Вопрос возник вот в чем...
Я отправляю пост запрос через idhttp получаю ответ вида

speaker1: 123213 speaker2: 12323 speaker3: 323284372948 speaker4: 0585443 speaker5:324234

При чем при новом пост запросе, колличетсво цифр меняется так же как и сами цифры!
Необходимо, чтобы к моим переменным присваивались только значения

speaker1:=123213;
speaker2:=12323;
speaker3:=323284372948;
speaker4:=0585443;
speaker5:=324234;

буквы мне не нужны! Как мне это реализовать?!

[Stilet]

А ты смог бы переписать сервер так чтоб он возвращал в результате строку

speaker1=123213
speaker2=12323
...

?

Если да то просто создай объект TStringList, его свойству присвой эту строку, а потом получить нужную переменную будет легко написав

...:=s.Value['speaker1']

Где s - TStringList
Уловил идею?

[Fizerator]

Сервер не мой Я просто делаю бота для игры... И мне необходимо когда я получаю speaker'ы, а это в игре время мне к моим таймерам в интервал приписывалось оно и после окончания времени таймер опять отправляет запрос на сервер с получением нового времени...

[cosmic_call]

Если я правильно понял то можно ведь просто посимвольно сканировать строку и добавлять значения в массив. они же разделены пробелами

[Fizerator]

Объясни на примере, как это можно сделать?! Или есть что нибудь типо то что я получаю в ответном запросе... я присваиваю это мемо и каким нибудь образом в мемо каждое слово до пробелы писалось на новой строчке?! Если такое можно сделать, то дальше я справлюсь сам...

[cosmic_call]

ну исходя из того что сказал Stillet сделалось все еще проще:

procedure TForm1.Button1Click(Sender: TObject);
var s:  string;
    strlist:TStringList;
    i:byte;
begin
s:='speaker1: 123213 speaker2: 12323 speaker3: 323284372948 speaker4: 0585443 speaker5: 324234';
s:=StringReplace(s, ': ', '=', [rfReplaceAll]);
s:=StringReplace(s, ' ', #13#10, [rfReplaceAll]);
strList:=TStringList.Create;
strList.Text:=s;

s:=strList.Values['speaker3']; //вот например значение speaker3 s:=323284372948

for i:= 0 to strList.Count - 1 do
  memo1.Lines.Add(strList.Strings[i]);  //вывод в мемо всех строк

end;

можно организовать не стринглист а динамический массив даже просто. мне бы так было удобнее

[Fizerator]

Огромное спасибо Честно очень помогли!