Автор Лера Аникеева задал вопрос в разделе Другие языки и технологии
Помощь в перемешении файлов в Delphi 7 и получил лучший ответ
Ответ от Vlad_IT Dolian[новичек]
Сделайте через рекурсивный поиск и определяйте расширение файла и перемещайте. Дать пример могу только на C#, на делфи врятли смогу.
Ответ от Денис Мастер[гуру]
function MoveFiles(source, mask: string;destination: string): boolean; var searchrec: TSearchRec; errorcode: integer; success: boolean; begin success := TRUE; try try errorcode := FindFirst(source + mask, faAnyFile
function MoveFiles(source, mask: string;destination: string): boolean; var searchrec: TSearchRec; errorcode: integer; success: boolean; begin success := TRUE; try try errorcode := FindFirst(source + mask, faAnyFile
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Помощь в перемешении файлов в Delphi 7
Delphi Почему при переименовании файлы просто пропадают использую стандартную процедуру она во вложениях
Delphi функция RenameFile переименовывает файл или папку и возвращает True если операция
подробнее...