mein letzter post.
durch folgenden zusatz hat es nun geklappt, auch leere verzeichnisse mit einzubeziehen:
Delphi-Quellcode:
// . . .
AFTP.List;
// . . .
// hier der zusatz
for i := FTPItemList.Count - 1 downto 0 do
begin
if (FTPItemList.Items[i].FileName = '.') or (FTPItemList.Items[i].FileName = '..') then
FTPItemList.Delete(i);
end;