|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Копия файла с новым именем
Здравствуйте.
Нужна помощь. Как можно осуществить копирование файла, но с каждым разом с новым именем. Анализировала программа каждое имя и присваивала новое т.е. test1, test2, test3 и т.д. Код:
procedure TForm1.BitBtn1Click(Sender: TObject); begin if CopyFile('C:\test\test.xls', 'D:\test\test1.xls', true) then ShowMessage('файл скопирован.') else ShowMessage('ошибка копирования.'); end; |