Заметка быдла пишущего ногами, запись III
Рекурсивный метод удаления файлов и вложенных папок по заданному пути: function KillDir (Dir: AnsiString): boolean; var   Sr: SysUtils.TSearchRec; begin {$I-}   if (Dir <> '') and...
unauthorized
24 дек. / 18:15
  • 184
  • 0