function DeleteFile(lpFileName: PAnsiChar): LongBool;

 

파일이 없거나 지워지지 않았을 경우 False 를 리턴함.

읽기전용파일의 경우 지워지질 않길래 3분간 고민하다가 읽기전용속성을 없애고 지우니 잘 지워짐...

 

BOOL SetFileAttributes(
  LPCTSTR lpFileName,   // 파일이름
  DWORD dwFileAttributes  // 적용할 속성
);

 

DeleteFile('C:\xxx.txt');

 

위의 코드를 사용해서 지워지지 않는다면,

 

SetFileAttributes(PChar('C:\xxx.txt'), FILE_ATTRIBUTE_NORMAL);

DeleteFile('C:\xxx.txt');

 

이렇게 해보자.









Posted by bloodguy
,