Показать сообщение отдельно
  #2  
Старый 17.06.2010, 02:54
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,105
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

1. Качаем файл с сайта (примеров использования TIdHTTP полно).
2. Берем его как строку, убирая все переводы строк (#13 и #10). Можно воспользоваться функцией Stringreplace (читаем хелп - там все подробно описано, ну или ищем пример здесь - тоже была куча примеров).
3. Режем на на подстроки по ";" - можно воспользоваться хитрым способом:
Код:
StringList.Test := StringReplace(S,';',#13#10,[rfReplaceAll]);
получим список строк.
4. Парсим строки по символу ":" - с помощью функций Pos и Copy (опять же ищем пример в форуме или ты думаешь, что ты первый ктакой вопрос задаешь?).
Ответить с цитированием