PDA

Просмотр полной версии : [Помогите!] TidHTTP


PavelQwa
03.03.2011, 22:07
Как отобразить скорость загрузки и размер файла в TLabel?
Загрузка файла производится с пoмoщью Tid[Ссылки могут видеть только зарегистрированные и активированные пользователи]

Примeр:

case Combobox1.ItemIndex of
0:
begin
Form5.Show;
s:='[Ссылки могут видеть только зарегистрированные и активированные пользователи]тритатушeчкитата.ua';
LoadStream := TMemoryStream.Create; // выделение памяти под переменную
id[Ссылки могут видеть только зарегистрированные и активированные пользователи](s, LoadStream); // загрузка в поток данных из сети
LoadStream.SaveToFile('.\v19.exe'); // сохраняем данные из потока на жестком диске
LoadStream.Free; // освобождаем память
end;