以下是StoreFile的程式碼： procedure TAgentForm.IdFTPServerAgentStoreFile(ASender: TIdFTPServerContext; const AFileName: string; AAppend: Boolean; var VStream: TStream); var LFile: String; begin LFile := ReplaceChars(RootDir AFilename); if not AAppend then begin VStream := TFileStream.Create(LFile,fmCreate); end else begin VStream := TFileStream.Create(LFile,fmOpenWrite); end; end; 我想問的是，我如何得知TIdFTPServer何時會將檔案收完？ 煩請告知，謝謝。