Delphi 로 컬 경로 의 생 성,로 컬 지정 한 폴 더 의 파일 비우 기

로 컬 경로 생 성
다운로드 작업 을 할 때,우 리 는 일반적으로 파일 을 로 컬 에서 지정 한 경로 로 다운로드 한 다음 에 다른 용도 로 사용한다.
프로그램 에 이상 이 생기 지 않도록 로 컬 에 지정 한 경로 가 있 는 지 판단 해 야 합 니 다.
CD Tmp 폴 더 를 예 로 들 면 우 리 는 이렇게 할 수 있 습 니 다.코드 는 다음 과 같 습 니 다.

 if not DirectoryExists('C:\Tmp') then
  if not CreateDir('C:\Tmp') then
   raise
    Exception.Create('Opps, Create New Dir Failed！');

로 컬 지정 한 폴 더 의 파일 비우 기
CD Tmp 폴 더 의 경우 Tmp 아래 의 모든 파일 을 비 울 수 있 습 니 다.코드 는 다음 과 같 습 니 다.

WINEXEC(PCHAR('CMD /C DEL /Q/F C:\tmp\*.*'), SW_HIDE);
Sleep(1000);

지식 포인트 확장:Delphi-text 파일 을 만 들 고 파일 에 데 이 터 를 추가 합 니 다.
텍스트 파일 만 들 기
코드 는 다음 과 같 습 니 다:

 //        
procedure CreateTextFile();
var
 TF: TextFile; 6 begin 8  AssignFile(TF,'C:\tmp\1.txt');
 ReWrite(TF);
 CloseFile(TF);
end;

텍스트 파일 에 내용 추가
코드 는 다음 과 같 습 니 다:

//          
Procedure AppendText(str: String);
var 
 TF: TextFile; 
begin 
 assignfile(TF,'C:\tmp\1.txt'); 
 rewrite(TF); 
 append(TF);//TMP     1.TXT    ，     
 writeln(TF, str);
 closefile(TF); 
end;

총결산
위 에서 말 한 것 은 작은 편집 이 여러분 에 게 소개 한 Delphi 로 컬 경로 의 생 성,로 컬 지정 폴 더 의 파일 을 비 우 는 것 입 니 다.여러분 에 게 도움 이 되 기 를 바 랍 니 다.궁금 한 점 이 있 으 시 면 메 시 지 를 남 겨 주세요.작은 편집 은 제때에 답 해 드 리 겠 습 니 다.여기 서도 저희 사이트 에 대한 여러분 의 지지 에 감 사 드 립 니 다!
만약 당신 이 본문 이 당신 에 게 도움 이 된다 고 생각한다 면,전 재 를 환영 합 니 다.번 거 로 우 시 겠 지만 출처 를 밝 혀 주 십시오.감사합니다!