1С 8.x : Открыть диалог множественного выбора файлов и чтение выбранных файлов

 Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);

Диалог.Заголовок = "Выберите файл";

Диалог.ПолноеИмяФайла = ""; 

Фильтр = "Все файлы (*.*)|*.*"; 

Диалог.Фильтр = Фильтр; 

//Разрешим множественный выбор

Диалог.МножественныйВыбор = Истина;

Диалог.Каталог = "F:\";

Если Диалог.Выбрать() Тогда

	//Переберем выбранные файлы

	Для Каждого ТекФайл из Диалог.ВыбранныеФайлы Цикл

		//Прочитаем выбранне файлы как текстовые

		Текст = Новый ЧтениеТекста(ТекФайл);

		Стр = Текст.ПрочитатьСтроку();

		Пока Стр <> Неопределено Цикл

			Сообщить(Стр);			

			Стр = Текст.ПрочитатьСтроку();			

		КонецЦикла; 

	КонецЦикла;

КонецЕсли;