работа с тектовым документов

  • Автор темы WildAnther
  • Дата начала
W

WildAnther

#1
Добрый день товарищи. Имеется текстовый файл вида:
"Версия 2.5.292.0
Имя Пользователь"
Как таковых разделителей нету... Строк около 150 таких, из них нужных строк 20 причем идущих не по порядку а в разброс.
Надо то что во второй колонки, предположим строку найти не проблема с нужным началом, но вот как взять второй столбик...

Версия 8.1.
Заранее спасибо!=)
П.С. пробелов много между колонками.
 

Дайнеко

Well-known member
19.11.2009
951
0
#2
Чуть понятней, пож.
И еще, слова пишите правильно. А предложения короче.
 
W

WildAnther

#3
Извиняюсь, что именно понятней?
Приму к сведению=) Буду писать короче и ясней.
Есть тхт файл. В тхт файле 2 "колонки" как в первом посте, "колонки" разделены пробелами Мне нужные данные что во второй "колонки". Как найти строчку с нужными данными я решил вот так:
Код:
ОС = "Имя";
Текст.КоличествоСтрок()
Для а = 1 по 20 Цикл
Стр = Текст.ПолучитьСтроку(а);
ТемпСтр = Стр;
Строчка = Найти(ТемпСтр, ОС);
Возможно глупо но ищется=)
Теперь есть нужная строка, как вытащить из этой строки после кучи пробелов слово "пользователь"...
Сейчас более менее понятно получилось?
 

Дайнеко

Well-known member
19.11.2009
951
0
#4
Более менее. Согласен, что немного глуповато: зачем нужно переписывать Стр в ТемпСтр? Текст.КоличествоСтрок() выглядит гордо, но для чего оно, а из файла почему читается только 20 строк. А если их 30, а 10?

Код:
КлючевоеСлово = "Имя";
Для а = 1 по Текст.КоличествоСтрок() Цикл
Стр = Текст.ПолучитьСтроку(а);
Позиция = Найти(Стр, КлючевоеСлово);
Если Позиция = 0 Тогда
Продолжить;
КонецЕсли;
ИмяПольз = СокрЛП(Сред(Стр, Позиция+СтрДлина(КлючевоеСлово)));
 
W

WildAnther

#5
Хорошо. Спасибо.
Насчет КоличестваСтрок(), просто упростил цикл для того чтобы проходов было меньше...=)
Спасибо огромное за помощь.=)