Problemas com o NMFTP.List
Estou tendo problemas com o NMFTP.List, pois algumas vezes q chamo esse comando o fluxo de código entra no NMFTP.Listlist não sai mais...
e dentro do evento NMFTP1ListItem eu faço algumas verificações simple do tipo:
pos(parte,nome);
if (bla-bla) then
e nada de loops... não achei motivo para dar loop infinito...
utilizo o Delphi 5.0 Windows 2000... etc...
Obrigado!!!
Rafael Paz
e dentro do evento NMFTP1ListItem eu faço algumas verificações simple do tipo:
pos(parte,nome);
if (bla-bla) then
e nada de loops... não achei motivo para dar loop infinito...
utilizo o Delphi 5.0 Windows 2000... etc...
Obrigado!!!
Rafael Paz
Rafael Paz
Curtidas 0
Respostas
Emerson1
02/04/2004
procedure TFrmftp.NMFTP1ListItem(Listing: String);
var
Q : integer;
begin
memo1.Lines.Add(IntToStr(Q)+´: ´ +Listing);///para o memo receber os itens listados
Inc(Q);/// contador de linha
end;
procedure TFrmftp.BtnlistaClick(Sender: TObject);
begin
Q := 1;
try
NMFTP1.List;
except
NMFTP1.Abort;
end;
end;
------------------
espero ter ajudado
duvida o meu email e emerson123_43@hotmail.com
var
Q : integer;
begin
memo1.Lines.Add(IntToStr(Q)+´: ´ +Listing);///para o memo receber os itens listados
Inc(Q);/// contador de linha
end;
procedure TFrmftp.BtnlistaClick(Sender: TObject);
begin
Q := 1;
try
NMFTP1.List;
except
NMFTP1.Abort;
end;
end;
------------------
espero ter ajudado
duvida o meu email e emerson123_43@hotmail.com
GOSTEI 0