G
gaodaya
Unregistered / Unconfirmed
GUEST, unregistred user!
我编写了一个FTP客户端程序,想列出所有的目录和文件。
我的代码如下:
NMFTP.ParseList := True;
NMFTP.List;
for I := 0 to (NMFTP.FTPDirectoryList.Name.Count - 1) do
with NMFTP.FTPDirectoryList do
begin
ListItem := lvFileList.Items.Add;
ListItem.Caption := Name[0];
ListItem.SubItems.Add(Size[0]);
ListItem.SubItems.Add(ModifDate[0]);
ListItem.SubItems.Add(Attribute[0]);
end;
可是NMFTP.FTPDirectoryList内容总是空的。
我不知道问题出在哪里,希望大家帮我一下。
我的代码如下:
NMFTP.ParseList := True;
NMFTP.List;
for I := 0 to (NMFTP.FTPDirectoryList.Name.Count - 1) do
with NMFTP.FTPDirectoryList do
begin
ListItem := lvFileList.Items.Add;
ListItem.Caption := Name[0];
ListItem.SubItems.Add(Size[0]);
ListItem.SubItems.Add(ModifDate[0]);
ListItem.SubItems.Add(Attribute[0]);
end;
可是NMFTP.FTPDirectoryList内容总是空的。
我不知道问题出在哪里,希望大家帮我一下。