Оправка файла

← →
Chlavik © (2003-04-09 03:12) [0]

Здрасте! Я столкнулся с таким заданием: нада как закачать на Ftp файл и сделать так что бы юзер видел прогрес закачки. Я рашьше такого не делал, что нада заюзать? Если бы У TNMFtp был event OnKByteSended он бы подошол :)

← →
Карелин Артем © (2003-04-09 12:41) [1]

Типа того:

procedure TForm1.NMSMTP1PacketRecvd(Sender: TObject);

begin
StatusBar1.SimpleText := IntToStr(NMSMTP1.BytesSent)+" bytes out of "+IntToStr(NMSMTP1.BytesTotal)+" transferred";
end;

← →
Карелин Артем © (2003-04-09 12:45) [2]

Но с точностью до наоборот ;)

Спасиба мне посоветовали TIdFTP. Я хочу попытатся сделать докачку :) Кстати можна на TidFTP это сделать? Я смотрел там есть метод PUT который может Append уже созданый на FTP файл...

Оправка файла Найти похожие ветки