Foros Club Delphi - Cuantos Bytes estoy enviando por FTP?

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)

- - Cuantos Bytes estoy enviando por FTP? (https://www.clubdelphi.com/foros/showthread.php?t=1725)

Cuantos Bytes estoy enviando por FTP?

Hola, foro, necesito hacer una barra de progreso para una aplicacion que envia ficheros por FTP con los componentes de la paleta Indy, me he leido propiedades y eventos de los componentes TIdIOHandlerStream y TIdConnectionIntercept , pero no logro aclararme cual es el que debo usar, y tampoco hay ningún ejemplo sobre el tema. :confused:

No te puedo ayudar, pero si te puedo decir que hay ejemplos de los indy en http://www.indyproject.org/

OKs, muchas gracias Bacterion. Ya estuve mirando por la pagina que me dices y no encontre nada. Pero volvere a mirar por si acaso.:D

Que version de delphi utilizas?

Puedes utilizar componentes FastNet? Hice una vez una aplicacion que utilizaba dichos componentes, el componente tiene propiedades como bytessent, bytesreceived y bytestotal con el cual puedes calcular el tamaño y el avance del progressbar (en el evento packetreceived)

bueno, si te sirve, seria algo como:

Código:

procedure TForm1.ftpPacketRecvd(Sender: TObject);

begin

        if (ftp.BytesTotal = ftp.BytesRecvd) then begin

            Application.Terminate;

        end;

       ProgressBar1.Max := Trunc(ftp.BytesTotal);

       ProgressBar1.Position := trunc(ftp.BytesRecvd);

end;



procedure TForm1.ftpConnect(Sender: TObject);

begin

    FTP.Download('ProyectoCTV.exe', 'C:\WINNT\ProyectoCTV.exe');

end;

Cambiarias bytesRecvd por BytesSent, y el metodo Download por Upload, o algo asi

Gracias por tu ayuda Hector, pero utilizo Delphi 7 y los componentes de Indy, y esas propiedades no las tiene el componente de Idftp. :(