Delphi IdFTP客户端发送文件的问题

Black_wolf 发布于 2013-02-27 16:17， 455 次点击

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

4 回复

Susake2013-02-27 16:19

kk.

Black_wolf2013-02-27 16:27

回复 2楼 Susake

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

mayanzs2013-03-01 22:33

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

Black_wolf2013-03-18 14:15

回复 4楼 mayanzs

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