Вопрос про FTP

[Kib]

Соеденяюсь с фтп с помошью IdFTP. Вопрос такой: как проверить существование каталога на фтп? А то у меня проблема при создании каталога, если он уже существует то выдается ошибка и программа прерывается, я хочу сделать так чтоб если каталог уже существует, то к создаваемому каталогу присваивалось имя - "copy" + имя. Заранее благодарю.
Внимательнее с выбором раздела, где хотите разместить тему...

На крайний случай можно не через IdFTP, а через что-то другое, мне главное как то узнать существует каталог на фтп или нет.

[Kib]

Да... Море ответов))) Проблему решил сам, написал вот такую функцию:

function finddir(dirname: string): boolean;
var
 list : TStrings;
 i: integer;
begin
 list := TStringList.Create;
 Form1.IdFTP1.List(list, '', false);

 for i:=0 to list.Count-1 do
   if (list[i]=dirname) then
   begin
     Result:=true;
     Exit;
   end;

 list.Free;
 Result:=false;
end;