jamlee 你好:
(1)FTP Protocol 在上傳檔案的時候，可以事先知道要傳送的封包大小，因此，
   你可以從 OnWorkBegin event procedure 裡面，取得 AWorkCountMax 的大
   小 (不為 0)
(2)FTP Protocol 在下載檔案的時候，無法事先知道要下載的封包大小，因此，
   你在 OnWorkBegin event procedure 裡面，取得 AWorkCountMax 的大小會
   是 0，才會出現你所說的那個錯誤
(3)所以，在下載檔案的時候，程式碼要稍微改變一下，才能夠得到正確的結果
   ，例如:
int gi3=0;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   IdFTP3->Host=FTP_SERVER;
   IdFTP3->Username=FTP_USERNAME;
   IdFTP3->Password=FTP_PASSWORD;
   IdFTP3->Connect(true, 3000);
   IdFTP3->ChangeDir("/upload");
   gi3=IdFTP3->Size("24bit.bmp");
   IdFTP3->Get("24bit.bmp", "24bit.bmp", true);
   IdFTP3->Disconnect();
}
void __fastcall TForm1::IdFTP3Work(TObject *Sender, TWorkMode AWorkMode,
      const int AWorkCount)
{
   Application->ProcessMessages();
   CGauge3->Progress=(int)((double)AWorkCount*(double)100/(double)gi3);
}
void __fastcall TForm1::IdFTP3WorkEnd(TObject *Sender, TWorkMode AWorkMode)
{
   CGauge3->Progress=100;
}
(4)以上的範例，下載了一個 5 MB 的圖檔，正確無誤