Тема: StringList поиск
Показать сообщение отдельно
  #3  
Старый 01.08.2014, 13:40
Аватар для @Rafa3L
@Rafa3L @Rafa3L вне форума
Начинающий
  
Регистрация: 09.11.2011
Адрес: Москва
Сообщения: 144
Версия Delphi: XE2
Репутация: 11216
По умолчанию
Код:
i:= pos('1234', List.Text);
if i > 0 then s:= Copy(List.Text, i, 9);
__________________
Помогаю платно.
Помогаю иногда бесплатно.
Ответить с цитированием