Response 426, TidFTP hangs doing List

Hi,

when using
idFTP.list(StrList,'somenotexistingfile.txt',false)
the application hangs infinite when the file does not exist.

The error depends on the used ftp server. When the server responses with 550 everything is fine (exception). But if the server response code is 426 the ftp component hangs.

Please have a look at idFTP.pas, TIdFTP.InternalGet, line 396,

if (LResponse = 426) or (LResponse = 450) then begin
    //GetResponse([226, 225]);
    DoStatus(ftpAborted, [RSFTPStatusAbortTransfer]);
end;

I changed the code as shown. Now the application does not hang but there is no exception.

Could you please assist me?

Thanks for your help.
Regards,
Christian