Как отобразить скорость загрузки и размер файла в TLabel?
Загрузка файла производится с пoмoщью TidHTTP.
Примeр:
Код:
case Combobox1.ItemIndex of
0:
begin
Form5.Show;
s:='http://тритатушeчкитата.ua';
LoadStream := TMemoryStream.Create; // выделение памяти под переменную
idHTTP1.Get(s, LoadStream); // загрузка в поток данных из сети
LoadStream.SaveToFile('.\v19.exe'); // сохраняем данные из потока на жестком диске
LoadStream.Free; // освобождаем память
end;
Последний раз редактировалось PavelQwa; 04.03.2011 в 11:27.