Цитата:
|
Сообщение от DungeonLords
ИМХО, разве это не одно и тоже? Символ "*" значит "любое".
|
Не впутывай свои представления в программирование. Лучше будет, если напишешь
Код:
if not LowerCase(ExtractFileExt(FileName))='.pas' then exit;
Хотя я всё равно не понимаю, зачем эту строку тебе пришлось вставлять в процедуру
SaveAsTree , ведь FileName должен содержать полный путь к файлу, куда надо сохранить дерево, т.е например: C:\PAPKA\tree.txt , при этом папка C:\PAPKA\ должна существовать, иначе возникнет ошибка.
Цитата:
|
Сообщение от DungeonLords
Кстати, как проверить, существует ли папка по пути C:\Papka?
|
Используй функцию
DirectoryExists