dir:='ftp://name:password@127.0.0.1:21/'+ListAptek[Apteka];
if not F.OpenFile (dir+'/update.txt', stCreate) message ('Ошибка создания файла! '+dir+'/update.txt', Error);
Срабатывает ошибка. Может есть другая команда, на vip?
Как создать файл на FTP
Модераторы: m0p3e, edward_K, Модераторы