Q&A

  • 검색 및 삭제
폼에다가 리스트박스, 버튼세개(시작,정지,삭제), 텍스트박스.. 이렇게두고 검색및 삭제기능을 만들고 싶습니다.

검색부분은 알겠는데 파일삭제는 어떻게 처리해야 하는지 궁금하네요.

관련소스나 자료있으신분 알려주세요.^^

좋은하루되세요.
이 게시물을
1  COMMENTS
  • Profile
    난 백만당적이다. • 2005.02.05 18:07
    procedure DeleteFiles (const Path, Mask : string; recursive : boolean);
    var
       Result : integer;
       SearchRec : TSearchRec;
    begin
       Result := FindFirst(Path + Mask, faAnyFile - faDirectory, SearchRec);
       while Result = 0 do begin
          if not DeleteFile (Path + SearchRec.name) then begin
             FileSetAttr (Path + SearchRec.name, 0); { reset all flags }
             DeleteFile (Path + SearchRec.name);
          end;

          Result := FindNext(SearchRec);
       end;
       FindClose(SearchRec);
    end;


    이렇게 하시면 되여....
    실은 저도 어디선가에서 펀것이지만....^^;
←First Page
345 346 347 348 349 350 351 352 353 354
Last Page→
한델 로그인 하기