![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Оправка ;файла
Chlavik © (2003-04-09 03:12:00)Здрасте! Я столкнулся с таким заданием: нада как закачать на Ftp файл и сделать так что бы юзер видел прогрес закачки. Я рашьше такого не делал, что нада заюзать? Если бы У TNMFtp был event OnKByteSended он бы подошол :)
Chlavik (2003-04-09 22:18:00) [1]Спасиба мне посоветовали TIdFTP. Я хочу попытатся сделать докачку :) Кстати можна на TidFTP это сделать? Я смотрел там есть метод PUT который может Append уже созданый на FTP файл...
Карелин Артем (2003-04-09 12:45:00) [2]Но с точностью до наоборот ;)
Карелин Артем (2003-04-09 12:41:00) [3]Типа того:
procedure TForm1.NMSMTP1PacketRecvd(Sender: TObject);
begin
StatusBar1.SimpleText := IntToStr(NMSMTP1.BytesSent)+" bytes out of "+IntToStr(NMSMTP1.BytesTotal)+" transferred";
end;