FTP - NMFTP

11/04/2003

0

nao estou conseguindo colher o número de arquivos do diretorio listado... sempre o ´NMFTP1.FTPDirectoryList.name.Count´ me retorna zero alguem pode me ajudar - Delphi 6?

O código é o seguinte:

procedure TForm1.Button1Click(Sender: TObject);
begin
with NMFTP1 do begin
Host := ´200.225.200.200´;
UserID := ´user´;
Password := ´pass´;
Port := 21;
ParseList := true;
Connect;
ChangeDir(´diretorio´);
List;
end;
end;

procedure TForm1.NMFTP1Success(Trans_Type: TCmdType);

begin
if Trans_Type = cmdList then
ShowMessage(intTostr(NMFTP1.FTPDirectoryList.name.Count));
end;
end.


Svaz

Svaz

Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar