4D Doc Center : FTP

4D Internet Commands v14

FTP_Progress


FTP_Progress ( esquerda ; superior ; tituloJanela ; textoTermo ; cancelar ) -> Resultado

Parâmetro	Tipo	Descrição
esquerda	Inteiro	Coordenada esquerda da janela
superior	Inteiro	Coordenada superior da janela
tituloJanela	cadeia	Título da janela do termômetro
textoTermo	cadeia	Texto sobre o termômetro
cancelar	cadeia	Texto do botão Cancelar
Resultado	Inteiro	Código de erro

Descrição

O comando FTP_Progress define coordenadas da janela e o texto da caixa de diálogo do indicador de progresso FTP. O indicador de progresso é mostrado ao chamar a FTP_Send, FTP_Append ou FTP_Receive. O comando FTP_Progress não mostra a janela de progresso em si, só define as características de visualização. Os comandos FTP_Send, FTP_Append e FTP_Receive permitem mostrar ou ocultar a janela de progresso.

A janela de progresso é fechada automaticamente ao terminar uma transferência de arquivos. Se por alguma razão o tamanho do arquivo que é enviado ou recebido não pode ser determinado, o termômetro será mostrado como um indicador de progresso sem fim e o tamanho do arquivo aparecerá como "desconhecido".

esquerda indica a posição do lado esquerdo da janela do termômetro. Se esquerda vale -1, a janela se centra horizontalmente na tela.

O parâmetro superior indica a posição do lado superior da janela do termômetro de progresso. Se passado -1 neste parâmetro, a janela se centra verticalmente na tela.

O parâmetro tituloJanela é o título da janela de progresso do termômetro. No seguinte exemplo, o título da janela é "Recepção de arquivo FTP". Se tituloJanela é uma cadeia vazia, janela não terá título.

O parâmetro textoTermo é o texto que será mostrado acima do termômetro de progresso. Se textoTermo é "*", o texto será o valor por padrão. No seguinte exemplo, textoTermo é "Arquivo: /pub/CGMiniViewer.hqx". O texto por padrão para o termômetro é o texto de estado do processo de transferência, enviado pelo servidor. Este texto varia em função das diferentes etapas do processo de transferência.

cancelar é o texto do botão Cancelar. Se passar uma cadeia vazia, o botão Cancelar se oculta. Se passar "*", o texto será o texto por padrão, ou seja "Cancelar".

Exemplo

 $error:=FTP_Progress(-1;-1;"Getting '/pub/CGMiniViewer.hqx'";"*";"*")

 Case of

    :(FTP_Login("ftp.4d.com";"anonymous";"dbody@aol.com";vFTP_ID;vFTP_Msg)#0)

    :(FTP_Receive(vFTP_ID;"/pub/CGMiniViewer.hqx";"HardDrive:Docsƒ:4D";1)#0)

    :(FTP_Logout(vFTP_ID)#0)

    Else

       $OK:=True `Todos os comandos se executam sem erro

 End case

Nota: Para maior informação sobre este uso particular da estrutura Case of, consulte Apêndice A, Dicas de programação.