[델파이팁]파일복사 copy

기본적으로 델파이 DeleteFile, RenameFile함수는 존재하지만

파일copy함수는 존재하지않는다  따라서 델파이 help (CopyFrom예제)를 참고한 코딩을 하거나

windowsAPI 인 CopyFile함수를 다음과 같이 사용한다.

 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  False면 무조건복사 True면 같은이름의 NewFile이존재하면 실패
   ); 
 

procedure TForm1.Button5Click(Sender: TObject);
begin
  if saveDlg.Execute  then
  begin
    if CopyFile(pchar(lbFile.Caption), pchar(saveDlg.FileName), True) then   
        ShowMessage('파일복사성공')
    else
        ShowMessage('파일복사실패');
  end;

end;