Delphi для качков

Лозовский Александр

Xakep, номер #052, стр. 052-074-4

UNTIL (BufferLen= 0) Or (NADO= FALSE); //Качаем, пока не все или надо

ShowMessage ('Успешно загружено!');

end;