Работа с файлами и кталогами

4.8K

07 ноября 2003 года

XenonXX

21 / / 29.10.2003

1) BOOL CopyFile(LPCTSTR lpszExistingFile, LPCTSTR lpszNewFile, BOOL fFailIfExists)

var fail:boolean;
if not copyfile('oldfile','newfile', fail)
then if fail then showmessage('file exist!');

2)function RenameFile(const OldName, NewName: string): Boolean;

3)function CreateDir(const Dir: string): Boolean;
Description
CreateDir creates a new directory. The return value is True if a new directory was successfully created, or False if an error occurred.

4) модулей подключать не надо.