пятница, 31 августа 2012 г.

Диалог выбора файла

Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
    Если Диалог.Режим=РежимДиалогаВыбораФайла.Сохранение Тогда
        Диалог.Заголовок = "Укажите файл для записи с данных";
    ИначеЕсли Диалог.Режим=РежимДиалогаВыбораФайла.Открытие Тогда
        Диалог.Заголовок = "Укажите файл с данных";
    Иначе
        Диалог.Заголовок = "Укажите каталог";
    КонецЕсли;

    Диалог.Фильтр = "*.epf|*.epf|*.erf|*.erf|Все файлы|*.*";
  
    Если Диалог.Выбрать() Тогда
        Каталог = Диалог.Каталог;
        Если не ПустаяСтрока(Каталог) Тогда
          
        КонецЕсли;
    КонецЕсли;