8.х Файловая система в 1Сv8

В 1Сv7.7 я писал:
ФС.УстТекКаталог(Дир);
ИмяФайла = ФС.НайтиПервыйФайл("*.*");
Пока ПустаяСтрока(ИмяФайла) = 0 Цикл
............................................
ИмяФайла = ФС.НайтиСледующийФайл();
КонецЦикла;

Как тоже самое сделать в восьмерке?

Это с каталогом... аналогично с файлами

Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
Если Диалог.Выбрать() Тогда
ПутьДоБазы = Диалог.Каталог;
КонецЕсли;

Спасибо