묻고 답하기 › IEDownload 컴포넌트 사용에서 질문이 있습니다.

정민섭 2003.04.30 20:53:14
IEDownload 컴포넌트를 사용해서 파일 다운로드를 하는데요..
다운로드 받은 파일명을 변경하고 싶어서..
파일 다운로드를 완료하는 프로시저에서 파일명을 변경시켰는데..
적용이 안되어서. 그냥..복사하려구 했는데..
복사도 안됩니다..
밑에..
변수 source, dest를 출력시켜 보면..
C:document and settingsadministrator바탕 화면abcde.gif
이런식으로 나오구요..
dest 도
C:document and settingadministrator바탕 화면save.gif
이렇게 나와요..
그래서 다운로드 파일이 존재하는지 체크했는데..
존재는 한다구 나오구요..
그런데 복사나 파일명 변경을 했더니 안됩니다.
왜그런지 이유를 잘 모르겠습니다..
고수님들의 도움 부탁드립니다..

procedure TDownLoadForm.IEDownload1Complete(Sender: TBSCB; Stream: TStream;
Result: HRESULT);
var
  source , dest : string;
begin
  If Result = S_OK Then
  Begin
     // 다운로드가 완료되었으므로...
     // 파일명 변경..
     source := Trim(st5.Caption + '' + download_file_save_name[download_file_count-1]);
     dest := Trim(st5.Caption + '' + download_file_name[download_file_count-1]);
     CopyFile(PChar(source), PChar(dest), false);
     download_file_count := download_file_count - 1;
     If download_file_count = 0 Then
     Begin
        // 더이상 다운로드 할 파일이 없으므로.

        Button2.Enabled := false;
        download_file_count := 0;
        label1.Caption := '다운로드 완료';
        //FILERENAME;
     End
     Else
     Begin
        //MoveFile( PChar(source_name), PChar(dest_name));
        IEDownload1.Go(DOWNURL+download_file_dir[download_file_count-1]+'/'+download_file_save_name[download_file_count-1], st5.Caption+'/'+download_file_save_name[download_file_count-1]);
        st2.Caption := download_file_name[download_file_count-1];
     End;
  End  
Cancel