Имя файла без каталога

 

ДлинаКаталога=СтрДлина(Диалог.каталог);

ПолнаяДлина=СтрДлина(Диалог.ПолноеИмяФайла);

ИмяФайла=Прав(Диалог.ПолноеИмяФайла,ПолнаяДлина-ДлинаКаталога);