|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
//Функция позволяет пользователю выбрать каталог на диске. Функция ВыбратьКаталог(ИмяКаталога) Экспорт Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога); Диалог.Заголовок = "Укажите каталог"; Диалог.МножественныйВыбор = Ложь; Диалог.Каталог = ИмяКаталога; Если Диалог.Выбрать() Тогда ИмяКаталога = Диалог.Каталог; Возврат Истина; Иначе Возврат Ложь; КонецЕсли; КонецФункции |
About the Author
