Имя: Пароль:
1C
1С v8
Не удается прочитать файл.
0 prilforreal
 
12.10.17
15:20
Доброго дня! 1с8.3 конфа самописная. Не удается вывести текст из файла тхт в поле ввода, вылетает
Не удалось прочитать файл: {Обработка.ОтправкаПисем.Форма.Форма1.Форма(154)}: Значение не является значением объектного типа (Прочитать)

Ума не хватает самому дойти до причины, подскажите пожалуста

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

Процедура ОтправитьПисьма()
1 Numerus Mikhail
 
12.10.17
15:21
(0) Что такое текст письма?
2 prilforreal
 
12.10.17
15:24
(1) Имя поля ввода куда текст выгружаться должен
3 Филиал-msk
 
12.10.17
15:49
(2) А почему ты думаешь, что оно так умеет?
4 h-sp
 
12.10.17
15:53
(2) поле ввода читает файлы? Разве?
5 prilforreal
 
12.10.17
15:56
(3) Метод же есть такой
6 prilforreal
 
12.10.17
15:58
(4) А что читает? Или лучше как поле ввода научить?
7 prilforreal
 
12.10.17
15:59
(4) В семерке читало
8 prilforreal
 
12.10.17
16:00
(7) Внешней компонентой....
9 prilforreal
 
12.10.17
16:03
(3) ТекстовыйДокумент (TextDocument)
Прочитать (Read)
Вариант синтаксиса: Из файла

Синтаксис:

Прочитать(<ИмяФайла>, <ТипФайла>, <РазделительСтрок>)
Параметры:

<ИмяФайла> (обязательный)

Тип: Строка.
Имя текстового файла.
<ТипФайла> (необязательный)
10 h-sp
 
12.10.17
16:06
(9) ну и читайте через текстовый документ. Зачем вы через поле ввода читаете?
11 prilforreal
 
12.10.17
16:11
(10) Чтобы текст из файла залетел в поле ввода, можно было его редактировать, а после отправлять в письме
12 prilforreal
 
12.10.17
16:30
Скажите кто нибудь, возможно ли из текстового файла записывать текст в поле ввода?
13 prilforreal
 
13.10.17
09:46
Кое как с горем пополам смог файл прочитать и вытащить в служебные сообщения, но все равно перенести данные в поле ввода ума не хватает... пока только текСтроку... устал уже на месте топтаться, подскажите народ как все строки вывести?

Текст = Новый ТекстовыйДокумент;
    Текст.Прочитать(ПутьКТФайлу);
    КоличествоСтрок = Текст.КоличествоСтрок();
Для Счетчик = 1 по КоличествоСтрок Цикл
    ТекСтрока = Текст.ПолучитьСтроку(Счетчик);
    Сообщить(ТекСтрока);
    ТекстПисьма = ТекСтрока;
    КонецЦикла;
14 Elf_80_lvl
 
13.10.17
10:12
В какое поле ввода хотите перенести значение?
15 youalex
 
13.10.17
10:21
(12) тебе похоже не поле ввода нужно, а поле текстового документа.
16 youalex
 
13.10.17
10:22
Ну или у поля ввода установить свойства многострочный режим и расширенное редактирование
17 prilforreal
 
13.10.17
10:53
Спасибо всем участникам)
ТекстПисьма = Текст.ПолучитьТекст();
18 Филиал-msk
 
13.10.17
10:54
Ожидаем вторую серию - как записать это все обратно (: