안녕하세요..
쓰레드내에서 NMFTP의 이벤트로 특정디렉토리내의
파일리스트를 가져오려하는데 이벤트가 발생되지않습니다.
크얼~~ 고수님들의 굴비기다리겠습니다.
...중략...
var
File_list : Array [0..100] of string;
cCnt : integer;
...중략...
procedure eThread.FtpConn;
begin
NMFTP.Connect;
Try
NMFTP.List; <<== 이벤트가 발생하지 않습니다.
Exception
ShowMessage('리스팅에러');
end;
end;
procedure eThread.ListItem(Listing: String);
begin
File_list[cCnt] := copy(Listing,40,length(Listing));
inc(cCnt);
end;