Показать сообщение отдельно
  #13  
Старый 01.11.2010, 09:23
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
begin
  CopyFile('c:\WINDOWS\system32\user32.dll', PChar(SaveDialog1.FileName), False);
end;

потому что CopyFile это WinAPI функция:

The CopyFile function copies an existing file to a new file.
BOOL CopyFile(
LPCTSTR lpExistingFileName, // pointer to name of an existing file
LPCTSTR lpNewFileName, // pointer to filename to copy to
BOOL bFailIfExists // flag for operation if file exists
);
__________________
Пишу программы за еду.
__________________
Ответить с цитированием