отправка на ftp

[Fahman]

Гуглил гуглил так и не нашел решение данной проблемы....

[Fahman]

Сообщение от Stilet

Ну тогда избавляйся от лени.
По поводу ошибки - значит нет такого файла. Ошибся ты в имени.

Хах поменял, по пытался взять файл с рабочего стола и путь вписываю в edit так он нормально взял залил его и бац ошибка....


STILET СПАСИБО ЗА ПОМОЩЬ !
Вопрос, чем мой самый первый код плох? просто я его по уроку по примеру делал и хотелось бы для себя полностью разобраться....

[Stilet]

так и не нашел решение данной проблемы....

Подсказываю: Символ "о" видится в латинской и русской раскладке одинаково но для компилятора это разные буквы.
Где-то в примере я описался и написал русскую букву.
Эх... Ну внимательнее же надо быть, и отучить свои руки копипастить!

чем мой самый первый код плох?

Понятия не имею. Текст ошибки ты не представил. Плох тем что хост не указываешь и ошибки не обрабатываешь, а так норм.

[Fahman]

Сообщение от Stilet

Подсказываю: Символ "о" видится в латинской и русской раскладке одинаково но для компилятора это разные буквы.
Где-то в примере я описался и написал русскую букву.
Эх... Ну внимательнее же надо быть, и отучить свои руки копипастить!

Понятия не имею. Текст ошибки ты не представил. Плох тем что хост не указываешь и ошибки не обрабатываешь, а так норм.

просто я делал по уроку а хост я выше писал это hostinger )) надо от учить себя копипастить в этом вы на 100% правы....


Еще один вопрос, вот я не могу найти как поверить существует ли директория в ftp просто чтоб по 10 раз не создавать одну и ту же папку хотел бы сначало сделать проверку, гуглил там говорят прочесть что есть на фтп и от этого уже проверять но вот если я повторно создаю то мне выводит ошибку
Can't create directory: File exists
как получать и обрабатывать такие ошибки?

[Stilet]

Can't create directory: File exists

Значит последовательным вызовом ChangeDir() проверяй: Получится войти в каталог - он создан. Нет - создавать.

i:=pos('/',path);
while i<>0 do begin
 try
  IdFTP.ChangeDir(copy(path,1,i));
 except
  Оn е:Exception Dо Вegin
   try
    IdFTP.MakeDir(copy(path,1,i))
    IdFTP.ChangeDir(copy(path,1,i));
   except
     Оn е:Exception Dо begin ShowMessage('Дапашолты: '+e.Message); exit; end;
   end;
 end;
 delete(path,1,i);
 i:=pos('/',path);
end;

Писано с потолка.