Перейти к содержанию

Поиск сообщества

Показаны результаты для тегов 'TidFTP'.

  • Поиск по тегам

    Введите теги через запятую.
  • Поиск по автору

Тип контента


Форумы

  • Общие вопросы
    • Анимация
    • Графика
    • Стили
    • Базы данных и REST
    • Компоненты
    • Положение, размеры, выравнивание
    • Работа с текстом
    • Приложение и формы
    • Отладка
    • Развертывание приложений
    • Вопросы по языку Object Pascal и RTL
    • Общая информация о TControl
    • События
    • Прочие вопросы
  • Вопросы по платформам
  • Вопросы по использованию RAD Studio
  • Native FGX
  • Обучение
  • Поиск специалистов по FireMonkey
  • Дополнительные ресурсы по FireMonkey
  • Организация работы данного форума
  • Видеокурсы

Поиск результатов в...

Поиск контента, содержащего...


Дата создания

  • Старт

    Конец


Дата обновления

  • Старт

    Конец


Фильтр по количеству...

Регистрация

  • Старт

    Конец


Группа


AIM


MSN


Сайт


ICQ


Yahoo


Jabber


Skype


StackOverflow


Защита от ботов


Город


Интересы

Найдено: 3 результата

  1. Всем привет, подскажите пожалуйста, как закачать файл с русским названием на сервер через IdFTP? Вместо названия файла появляются знаки вопросов. Сервер на UTF-8.
  2. Друзья, всем привет. Возникла следующая проблема. Использую IdFTP для закачки файла на сервер. Всё получается хорошо. Я коннектюсь к серверу и посылаю на него файл, но файл на сервере оказывается битым и отличается по размеру от оригинала. Вот код: procedure TForm5.Button2Click(Sender: TObject); var IdFTP:TIdFtp; begin IdFTP:=TIdFTP.Create(nil); if IdFTP.Connected then begin IdFTP.Abort; IdFTP.Quit; end; IdFTP.Username := '************.ru'; IdFTP.Password := 'ыыыыыыыыыыыы'; IdFTP.Host := 'чччччччччччч'; IdFTP.Port := 21; try IdFTP.Connect; IdFTP.ChangeDir('/test'); IdFTP.Put('E:\test\in\1.jpg', '1.jpg', False); IdFTP.Quit; except ShowMessage('xep'); end; IdFTP.free; end;
  3. Подскажите, как правильно проверить, есть ли папка на FTP сервере? Сейчас делаю так: function TFTP_As.FtpPathExist(Path: String): boolean; begin Result := false; try fFtp.MakeDir(Path); except Result := true; end; end; Но при большом кол-ве папок тяжело отлаживать программу - уж слишком много except"ов. Можно ли как-то иначе сделать эту проверку? Спасибо.
×
×
  • Создать...