这句话是我写的判断所选中的是不是文件夹的语句 idFTPClient.DirectoryListing.Items[filenum].ItemType = ditDirectory then 运行以后出现了idFTPClient.DirectoryListing.Items[filenum].ItemType的值是(out of bound) 77导致程序无法正常运行，求各位大神给个答案啊

kk.

啊啊啊啊。。。。你给答案啊。。。。帮忙解决下！！！！

应该是下界越界吧，许多的循环要用总数-1的
如：
for filenum:=0 to Allfilenum - 1 do
    idFTPClient.DirectoryListing.Items[filenum].ItemType =

这个问题解决了。。。但是我发现我进入子目录以后，子目录离得文件和文件夹不能显示啊