Вверх ↑
Этот топик читают: Гость
Ответов: 10
Рейтинг: 0
#1: 2018-06-21 18:19:31 ЛС | профиль | цитата
Как можно скачать файл с ftp сервера с помощью FTP_client, и сохранить на компе?
карма: 0

0
Разработчик
Ответов: 26153
Рейтинг: 2127
#2: 2018-06-22 00:39:43 ЛС | профиль | цитата
Finan писал(а):
Как можно скачать файл с ftp сервера с помощью FTP_client, и сохранить на компе?

Все это показано в примере $HiAsm$\Elements\Delphi\Example\Internet\FTP-Commander.sha
карма: 22

0
Ответов: 10
Рейтинг: 0
#3: 2018-06-22 11:26:45 ЛС | профиль | цитата
nesco писал(а):
Finan писал(а):
Как можно скачать файл с ftp сервера с помощью FTP_client, и сохранить на компе?

Все это показано в примере $HiAsm$\Elements\Delphi\Example\Internet\FTP-Commander.sha



а как скачать без участия пользователя, чтобы нажать кнопку и он скачался на заданное место?
карма: 0

0
Ответов: 4630
Рейтинг: 749
#4: 2018-06-22 13:02:25 ЛС | профиль | цитата
Смотришь ту самую схему, видишь где пользователь принимает участие - отрубаешь компоненты для "участия пользователя", вместо них заполняешь постоянные данные (типа, пути к удаленному файлу и к локальному файлу).

Можно было не создавать новую тему на форуме, а задавать вопросы в предыдущей.
карма: 26

0
Ответов: 10
Рейтинг: 0
#5: 2018-06-22 15:38:19 ЛС | профиль | цитата
А можешь схему навалять с скачиванием(если тебе не сложно), а до меня балбеса дойти не может как все таки это делается. Схему смотрел но нифига не понял.
карма: 0

0
Ответов: 4630
Рейтинг: 749
#6: 2018-06-22 16:17:30 ЛС | профиль | цитата

Add(MainForm,2953706,21,105)
{
Position=1
}
Add(Button,10531553,168,238)
{
Left=20
Top=60
Width=110
Caption="Скачать!"
link(onClick,307445:doOpen,[])
}
Add(FTP_Client,307445,280,238)
{
Name="FTP"
link(onConnect,2607648:doEvent1,[])
link(onGlobalError,3391674:doMessage,[])
AddHint(-10,-22,35,13,Name)
}
Add(Hub,2607648,385,238)
{
OutCount=3
link(onEvent1,9090339:doWork,[(421,244)(421,167)])
link(onEvent2,13632970:doFileOperation,[])
link(onEvent3,307445:doClose,[(423,258)(423,315)(268,315)(268,251)])
}
Add(FTPC_ReadWrite,13632970,686,245)
{
RemoteName="file.txt"
FTP_Client="FTP"
link(onFileOperation,3697321:doMessage,[])
link(LocalName,7746881:Value,[])
AddHint(82,38,42,13,RemoteName)
AddHint(-5,44,35,13,FTP_Client)
}
Add(Memory,7746881,686,161)
{
Default=String(file.txt)
AddHint(105,9,52,13,Default)
}
Add(Message,3391674,329,252)
{
Caption="Ошибка"
Icon=3
}
Add(InfoTip,1792088,637,140)
{
Info=#14:Куда сохранить|
Width=127
Height=67
}
Add(Message,3697321,742,245)
{
Message="Скачивание завершено"
Caption="Результат"
Icon=4
}
Add(FTPC_DirAction,16564829,539,161)
{
Directory="/dir1/dir2"
FTP_Client="FTP"
AddHint(-21,-41,59,13,Directory)
AddHint(-5,39,35,13,FTP_Client)
}
Add(InfoTip,1013139,497,84)
{
Info=#37:Перейти в каталог, где находится файл|
Width=127
Height=123
}
Add(Check,9090339,434,161)
{
Check=1
link(onEvent,16564829:doDirAction,[])
}

Редактировалось 1 раз(а), последний 2018-06-22 16:18:22
карма: 26

0
6
Сообщение
...
Прикрепленные файлы
(файлы не залиты)