Текст = новый ТекстовыйДокумент;
Текст.Прочитать(ФайлСданными);
Для й = 1 по Текст.КоличествоСтрок() цикл
СтрокаСданными = Текст.ПолучитьСтроку(й);
КонецЦикла
Текст = Новый ЧтениеТекста("d:\win.txt", КодировкаТекста.ANSI);
Стр = Текст.ПрочитатьСтроку();
Пока Стр <> Неопределено Цикл // строки читаются до символа перевода строки
Сообщить(Стр);
Стр = Текст.ПрочитатьСтроку();
КонецЦикла;
См. также:
ЗаписьТекста
ЧтениеТекста, конструктор По имени файла
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший