02.02.2010, 19:48
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
Провел на форуме:
500264
Репутация:
69
|
|
Сообщение от SultanOFF
так это ведь поможет лишь отследить идет ли передача в данный момент, а как узнать сколько байт уже передано?
Код:
procedure TMainForm.IdHTTP1Work(ASender: TObject; AWorkMode: TWorkMode;
AWorkCount: Integer);
beign
If AWorkMode = wmWrite Then { Действия }
end;
а это что?
переменная AWorkCount тебе покажет сколько переданно
|
|
|