22.08.2012, 01:59
|
 |
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
С использованием WinAPI:
Код:
MoveFileEx(PChar(OldName), PChar(NewName), MOVEFILE_COPY_ALLOWED);
или
MoveFileEx(PChar(OldName), PChar(NewName), MOVEFILE_REPLACE_EXISTING); |