질문]ftp서버에서 인디콤퍼넌트로 파일을 다운로드시 에러 가 납니다

인디 샘플인데 잘안되네요 ?

끝난후에 보면 파일이름만 있고 크기는 0입니다

     TFileStream *strm;
     AnsiString s;

     s = edtLocalFile->Text;

     if(s == "")
     {
          s = ExtractFileName(edtRemoteFile->Text);
     }

     strm = new TFileStream(s, fmCreate);

     try
     {
          TrivialFTP->Host = edtHost->Text;
//        IdFTP1->Host = "ftp://127.0.0.1";
             TrivialFTP->Port = 21;
//             TrivialFTP->User = "administrator";
//             TrivialFTP->Password = "password";
         TrivialFTP->Active=TRUE;

          TrivialFTP->Get(edtRemoteFile->Text, strm);
     }
     __finally
     {
          delete strm;
     }
}
//---------------------------------------------------------------------------


void __fastcall TfrmMain::FormClose(TObject *Sender, TCloseAction &Action)
{
         TrivialFTP->Active=FALSE;

}
//---------------------------------------------------------------------------