Загрузить в поле ввода текст из файла

Новая тема
1С8.3 Конфигурация самописная, пишу обработку для рассылки почты, помимо общего функционала должна быть возможность выгрузить текст из файла в поле ввода ТекстПисьма, испытываю затруднения при выводе текста в поле, подскажите, как вывести не только текущую строку, а все строки документа по очереди?


Процедура ЗагрузитьТекстИзФайла(Элемент, ДанныеВыбора, СтандартнаяОбработка)
      
  Перем Стр;
  ДТФ = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
  ДТФ.Заголовок = "Выберите файл (*.TXT/.RTF.HTML*)";
  ДТФ.Фильтр = "Текстовый Документ (*.txt;*.doc;*.rtf)|*.txt;*.doc;*.rtf|";
  ДТФ.ПредварительныйПросмотр=Ложь;
  ДТФ.ПроверятьСуществованиеФайла=Истина;
  Если ДТФ.Выбрать() Тогда
        
  ПутьКТфайлу = ДТФ.ПолноеИмяФайла;
КонецЕсли;
      Текст = Новый ТекстовыйДокумент;
      Текст.Прочитать(ПутьКТФайлу);
      КоличествоСтрок = Текст.КоличествоСтрок();
Для Счетчик = 1 по КоличествоСтрок Цикл
   ТекСтрока = Текст.ПолучитьСтроку(Счетчик);
   Сообщить(ТекСтрока);
      ТекстПисьма = ТекСтрока;
      КонецЦикла;    
           
КонецПроцедуры
Ответили: пост #2
Ответ на пост №1
Илья Привалов, так у тебя ТекстПисьма каждый раз перезаписывается текущей строкой из файла.
Prikum пишет:
Цитата

                              
                                     Илья Привалов , так у тебя ТекстПисьма каждый раз перезаписывается текущей строкой из файла.
                                                            ­      
Я понимаю, подскажите будьте добры, каким образом мне каждую строку выводить? Или может все можно сделать проще и не к строке обращаться, а сразу из файла в поле ввода поместить, пробовал методом ПРОЧИТАТЬ, но как оказалось у поля ввода такого метода нет..
Ответили: пост #4
Ответ на пост №3
Илья Привалов, какой тип у поля ввода?
Ответили: пост #5
Ответ на пост №4
Prikum, Строка с неограниченной длинной.
Ответили: пост #6 , пост #7
Ответ на пост №5
Илья Привалов,
Код
ТекстПисьма = Текст.ПолучитьТекст(); 
Ответ на пост №5
Илья Привалов, только цикл убери.
Большое спасибо, все работает)
Читают тему
(гостей: 1)

Быстрый переход