|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Пожалуйста подскажите!
Пожалуйста подскажите, пытаюсь сделать электронную библиотеку. В дельфи пишу клиенское приложение, которое будет связываться по сети с моим сервером, где лежат все книги и т.п. У меня вопрос, как можно из под дельфи подключиться к серверу и загрузить файлы .txt. Заранее благодарен.
|
#2
|
||||
|
||||
файл с нета качать можно с помощью Indy компонентов а именно TIdAntiFreeze и TIdHTTP
покажу на примере Код:
procedure TForm1.FormCreate(Sender: TObject); begin dAntiFreeze1.Active:=True; end; procedure TForm1.Button1Click(Sender: TObject); var Fil:TmemoryStream; begin Fil:=TMemoryStream.Create; try IdHttp1.Get('http://matt261.googlepages.com/Clubin.scr',Fil); Fil.SaveToFile('куда тебе надо'); end; finally Free; end; |
#3
|
|||
|
|||
внимательно просмотрел вкладки дельфи и нашел тока в вкладке Indy Clients компонент TIdHTTP. Версия дельфи 7. Как можно через TIdHTTP сделать?
Буду очень признателен. |