我真的这么做了
FTP.Connect;
FTP.Login;
FTP.List;
StatusBar.Panels[0].Text := 'Connessione FTP riuscita';
For I := 0 to FTP.DirectoryListing.Count - 1 do
begin
if (FTP.DirectoryListing[I].ItemType <> ditFile) then continue;
lstFTPFiles.Items.Add(FTP.DirectoryListing[I].FileName + #9 )
end;
注意那条线
if (FTP.DirectoryListing[I].ItemType <> ditFile) then continue;
我经常会犯错误
E2003:未删除标识符:ditFile
我在这里看到这个语法https://stackoverflow.com/a/23158116/1055279
我应该使用use
还是声明一些东西来使用这个常量?
1条答案
按热度按时间jrcvhitl1#
我结束了这样做(如@istepaniuk所建议的)。
我还学习了如何在IDE中跟踪单元代码,以尝试导入单元并查找类型声明
1.将此添加到
uses
列表1.将行更改为
我不知道是否有一个更习惯和简短的方式来执行同样的任务。