Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Интернет


lsvit ©   (2006-12-18 21:29:00) 

Как мне проще всего скачать файл, расположенный по заранее известному адресу?
например www.aaa.ru/readme.txt


Anatoly Podgoretsky   (2006-12-19 09:57:00) [1]

> Германн  (19.12.2006 4:02:11)  [11]

А что делать, если Борланд его "присвоила" и сует его теперь везде.


Anatoly Podgoretsky   (2006-12-19 09:56:00) [2]

> Джо  (19.12.2006 3:53:10)  [10]

Естественно, такое ради этого делать не стоит, это очень большой пакет, как и Инди и только для этой цели не совсем рационально. Тут хватит обычного WinInet.dll, даже Инди не стоит использовать.


Anatoly Podgoretsky   (2006-12-19 09:55:00) [3]

> Германн  (19.12.2006 1:21:08)  [8]

И что интересно, что до сих пор продукт работает от Д1 до Д2006 в одном флаконе, только в версии 6 он уходит от поддержки версий Дельфи ниже 5


MetalFan   (2006-12-19 09:31:00) [4]

блин, да этож 2 строчки)


uses
 ...UrlMon;
...
   function DownloadFile(SourceFile, DestFile: string): Boolean;
   begin
     try
       Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0;
     except
       Result := False;
     end;
   end;


смотрим MSDN http://msdn.microsoft.com/workshop/networking/moniker/reference/functions/urldownloadtofile.asp


evvcom   (2006-12-19 08:51:00) [5]

Лучше вообще не заморачиваться, а в любимом броузере вбить нужный адрес и делов! :-)))


allrussia   (2006-12-19 07:20:00) [6]

Джо
TIdHTTP тоже бесплатен и даже входит в стандартную поставку Delphi.

Да это я в курсе. Просто посоветовал, что считаю лучшим.


Германн   (2006-12-19 04:54:00) [7]


> Джо ©   (19.12.06 04:07) [12]
>
> > [11] Германн ©   (19.12.06 04:02)
> > А ты уже установил некий "нестандартный набор компонентов"!
>
> > И этот  набор - Indy!
>
> Нет, я его не устанавливал отдельно. Он идет с Делфи, для
> нее он вполне стандартен.
>

Столь же стандартен и ICS. Вот только не "идёт с Дельфи". :)


Джо   (2006-12-19 04:07:00) [8]

> [11] Германн ©   (19.12.06 04:02)
> А ты уже установил некий "нестандартный набор компонентов"!
> И этот  набор - Indy!

Нет, я его не устанавливал отдельно. Он идет с Делфи, для нее он вполне стандартен.


Германн   (2006-12-19 04:02:00) [9]


> Джо ©   (19.12.06 03:53) [10]
>
> Ничего плохого сказать не хочу (да и не могу) о ICS, однако
> устанавливать нестандартный набор компонентов только для
> того, чтобы «скачать файл, расположенный по заранее известному
> адресу» считаю несколько нецелесообразным. Что-то вроде
> «из пушки по воробьям».

А ты уже установил некий "нестандартный набор компонентов"! И этот  набор - Indy!


Джо   (2006-12-19 03:53:00) [10]

Ничего плохого сказать не хочу (да и не могу) о ICS, однако устанавливать нестандартный набор компонентов только для того, чтобы «скачать файл, расположенный по заранее известному адресу» считаю несколько нецелесообразным. Что-то вроде «из пушки по воробьям».


Gero   (2006-12-19 03:43:00) [11]

TDownloadURL


Германн   (2006-12-19 01:21:00) [12]


> Anatoly Podgoretsky ©   (19.12.06 01:07) [7]
>
> > Германн  (19.12.2006 1:04:06)  [6]
>
> Не захотел губить проект в этом болоте.
>

Я так и понял.
Я его узнал, когда появились просьбы сделать "удалённое рабочее место" в Д1. В Д1 ничего по поводу работы по сети не было в принципе (это Вы и сами знаете). Стал искать. И нашел только продукт от FP. Я (точнее мы) даже послал ему открытку с изображением Красной Площади :)


Anatoly Podgoretsky   (2006-12-19 01:07:00) [13]

> Германн  (19.12.2006 1:04:06)  [6]

Не захотел губить проект в этом болоте.


Германн   (2006-12-19 01:04:00) [14]


> Джо ©   (19.12.06 00:29) [5]
>
> > [4] allrussia ©   (19.12.06 00:06)
> > lsvit
> > вот бесплатные компоненты
>
> TIdHTTP тоже бесплатен и даже входит в стандартную поставку
> Delphi.
>

ICS тоже бесплатен, а в стандартную поставку Delphi он не входит только потому, что его автор, в своё время, не пожелать продаться Борланду (со слов АП).


Джо   (2006-12-19 00:29:00) [15]

> [4] allrussia ©   (19.12.06 00:06)
> lsvit
> вот бесплатные компоненты

TIdHTTP тоже бесплатен и даже входит в стандартную поставку Delphi.


allrussia   (2006-12-19 00:06:00) [16]

lsvit
вот бесплатные компоненты
там примеры есть
http://www.overbyte.be/arch/ics.zip


Джо   (2006-12-18 21:45:00) [17]

> [2] lsvit   (18.12.06 21:43)
> ммм... сложновато.

Три-четыре функции это сложно? Хм.


> чтоб я кинул на форму, а в строке указал путь к файли. и
> всё.

Есть. TIdHTTP.


lsvit   (2006-12-18 21:43:00) [18]

ммм... сложновато. а в дельфи ничего встроенного нет? чтоб я кинул на форму, а в строке указал путь к файли. и всё.


Джо   (2006-12-18 21:32:00) [19]

uses WinInet;
InternetOpen,InternetOpenUrl,InternetReadFile etc.


Наверх

Титульная страница Поиск, карта сайта Написать письмо