Q&A

  • 화일을 Copy하려고 합니다................
델파이에서 특정 Directory에 있는 특정화일을

다른 Directory로 Copy하는 것을 하려 합니다.....



그리구 생성일자가 같은 화일일 경우에는 Copy를

하지 않으려고 합니다.



제가 시도한 방법은 Batch 화일에 xcopy명령어를 사용하여 처리하였는데



예) ShellExecute(frmAutoDownUT1.Handle,nil,'x.bat','0','C:Windows',0);



혹시 다른방법을 아시는분이 계시면 한 수 부탁드립니다......



그럼 즐거운 하루되십시요.........





4  COMMENTS
  • Profile
    펑크 2000.07.29 01:14
    이동 - MoveFile()

    ex. MoveFile(PChar('C:zzztest.txt'), PChar('C:zzzmovetest.txt'));



    삭제 - DeleteFile()

    ex. DeleteFile(PChar('C:zzztest.txt'));



    복사 - CopyFile()

    마지막 인자가 False 일경우 화일이 존재할때 덮어쓴다

    ex. CopyFile(PChar('C:zzztest.txt'), PChar('C:zzzcopytest.txt'), False);





  • Profile
    오승섭 2000.07.29 01:51
    답변에 감사드립니다......



    그런데 제가 질문드렸던 것은 단순한 CopyFile하는게 아니라

    화일의 생성일자를 Check해서 가장 최근에 수정된 화일만 복사하는것이거든요.....



    죄송하지만 다시 한번 답변을 부탁드립니다....







    펑크 wrote:

    > 이동 - MoveFile()

    > ex. MoveFile(PChar('C:zzztest.txt'), PChar('C:zzzmovetest.txt'));

    >

    > 삭제 - DeleteFile()

    > ex. DeleteFile(PChar('C:zzztest.txt'));

    >

    > 복사 - CopyFile()

    > 마지막 인자가 False 일경우 화일이 존재할때 덮어쓴다

    > ex. CopyFile(PChar('C:zzztest.txt'), PChar('C:zzzcopytest.txt'), False);

    >

    >

  • Profile
    펑크 2000.07.29 02:44
    function GetFileDate(TheFileName: string): string;

    var

    FHandle: integer;

    begin

    FHandle := FileOpen(TheFileName, 0);

    try

    Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));

    finally

    FileClose(FHandle);

    end;

    end;



    그럼 날짜 체크한후에 하세요...

  • Profile
    오승섭 2000.07.29 03:42




    펑크 wrote:

    > function GetFileDate(TheFileName: string): string;

    > var

    > FHandle: integer;

    > begin

    > FHandle := FileOpen(TheFileName, 0);

    > try

    > Result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));

    > finally

    > FileClose(FHandle);

    > end;

    > end;

    >

    > 그럼 날짜 체크한후에 하세요...

    • moirso
    • 2000.07.29 02:12
    • 8 COMMENTS
    • /
    • 0 LIKES
    • 장지용
      2000.08.01 02:11
      moirso wrote: > 아 저는 델파이 초보자 인데, 쫌 황당한 일이 발생해서리 > 조언을 구하고자 합니다. 제...
    • 허춘
      2000.07.29 09:01
      moirso wrote: > 아 저는 델파이 초보자 인데, 쫌 황당한 일이 발생해서리 > 조언을 구하고자 합니다. 제...
    • moirso
      2000.08.02 21:24
      허춘 wrote: > Delete delphi32.dsk under your delphi/bin directory. > Should reset all your IDE env...
    • 최용일
      2000.07.29 04:52
      안녕하세요. 최용일입니다. 도스에서 부팅하셔서 ScanReg.exe /restore 하여 실행해서 레지스트리를 델...
    • Black}{ole
      2000.07.29 02:30
      moirso wrote: > 아 저는 델파이 초보자 인데, 쫌 황당한 일이 발생해서리 > 조언을 구하고자 합니다. 제...
    • moirso
      2000.07.29 02:57
      Black}{ole wrote: > moirso wrote: > > 아 저는 델파이 초보자 인데, 쫌 황당한 일이 발생해서리 > > ...
    • tommy
      2000.07.29 19:10
      moirso wrote: > Black}{ole wrote: > > moirso wrote: > > > 아 저는 델파이 초보자 인데, 쫌 황당한 ...
    • • • •
    • tommy
    • 2000.07.29 02:04
    • 0 COMMENTS
    • /
    • 0 LIKES
    • 한하눌
      2000.07.29 03:15
      어린왕자 wrote: > 역쉬 내용없슴다. www.rxlib.com에가서 다운받으세요..
    • heimdal
      2000.07.29 06:20
      > www.rxlib.com에가서 다운받으세요.. 여기여.. 안들어가져여..
    • mailext
    • 2000.07.29 01:53
    • 5 COMMENTS
    • /
    • 0 LIKES
    • 최용일
      2000.07.29 04:57
    • 최용일
      2000.07.31 19:12
    • 처버
      2000.08.01 00:06
    • 최용일
      2000.08.01 00:43
    • 초보
      2000.08.02 22:34
    • 델초보
    • 2000.07.29 01:49
    • 3 COMMENTS
    • /
    • 0 LIKES
    • 허춘
      2000.07.29 09:08
      델초보 wrote: > 안녕하세요...영원한 델초보입니다.. > 지금 mysql과 odbc를 이용해서 스트링그리드에 ...
    • 타락천사
      2000.07.29 03:53
      안녕하세여.. 타락임다..^^ 강제로 종료하면 안될거 같은데여... ODBC 접속 시간이 많이 걸리는건.. ...
    • 어린왕자
      2000.07.29 01:58
      안녕하셔요..저두 영원한 델초보인뎅.. 음..저두 알구 싶어요.. 분명..TADOConnection에는 ConnectionTim...
    • 이경원
      2000.07.29 01:39
      김선달 wrote: > 처음에 메인폼을 자동으로 생성을 하고 > MDI Child 폼은 항상 1개씩만 동적으로 생성...
    • 오승섭
    • 2000.07.29 01:08
    • 4 COMMENTS
    • /
    • 0 LIKES
    • 펑크
      2000.07.29 01:14
      이동 - MoveFile() ex. MoveFile(PChar('C:zzztest.txt'), PChar('C:zzzmovetest.txt')); 삭제 - ...
    • 오승섭
      2000.07.29 01:51
      답변에 감사드립니다...... 그런데 제가 질문드렸던 것은 단순한 CopyFile하는게 아니라 화일의 생성일...
    • 펑크
      2000.07.29 02:44
      function GetFileDate(TheFileName: string): string; var FHandle: integer; begin FHandle...
    • 오승섭
      2000.07.29 03:42
      펑크 wrote: > function GetFileDate(TheFileName: string): string; > var > FHandle: intege...
    • 이경원
    • 2000.07.29 01:36
    • 1 COMMENTS
    • /
    • 0 LIKES
    • 이경원
      2000.07.29 02:01
      selectcell event에서는 한박자 늦게 row의 값이 들어오는데, 제 생각으로는 1행에서 2행으로 값이 넘어 ...
    • 정지호
      2000.07.29 02:50
      아리엘 wrote: > procedure Tbbform.SpeedButtonClick(Sender: TObject); > var > Name : TSpeedButt...
    • 펑크
      2000.07.29 01:15
      > procedure Tbbform.SpeedButtonClick(Sender: TObject); > var > Name : TSpeedButton; > str :...
    • 강정한
      2000.07.29 18:31
      이영준 wrote: > test.cab파일에 대한 서명을 하고나서 test.htm 파일을 브라우저에서 보게되면 > > 서...
    • 남걸호
      2000.07.29 01:39
      김태영 wrote: > 폼을 Dll로 만들어 메인폼에서 호출하는데 Dll폼이 계속해서 같은 폼을 띄웁니다. > Dl...
    • 펑크
      2000.07.29 01:17
      주현이 wrote: > installshield로 setup화일을 만든후에 setup화일을 실행하고 xx.exe화일을 실행하면 > ...
    • 펑크
      2000.07.29 01:19
      선해석 wrote: > 쿼리의 결과로 데이터 들이 DBGrid에 나타나 있을때 > 현재 디비 그리드의 포인터가 어...
    • 허춘
      2000.07.29 10:01
      양면인쇄 wrote: > 퀵레포트로 작성한 2장짜리 문서가 있읍니다. > (폼도 2개죠 : 폼위에 QuickRep컴포넌...
    • 구창민
      2000.07.28 23:53
      어린왕자 wrote: > 안녕하셔요..영원한 델초보 어린왕자임다. > 비트맵을 이미지로 하는 버튼은 되는데.....
    • 김형준
    • 2000.07.28 22:56
    • 1 COMMENTS
    • /
    • 0 LIKES
    • yoonty
      2000.07.28 23:55
      김형준 wrote: > 이런 경험이 있는 분 있으시면 답변 부탁드립니다.. > 또 해결 방법을 알고 계시면 답변...