Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.01.07;
Скачать: CL | DM;

Вниз

Интернет   Найти похожие ветки 

 
lsvit   (2006-12-18 21:29) [0]

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


 
Джо ©   (2006-12-18 21:32) [1]

uses WinInet;
InternetOpen,InternetOpenUrl,InternetReadFile etc.


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

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


 
Джо ©   (2006-12-18 21:45) [3]

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

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


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

Есть. TIdHTTP.


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

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


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

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

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


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


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

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


 
Anatoly Podgoretsky ©   (2006-12-19 01:07) [7]

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

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


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


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

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


 
Gero ©   (2006-12-19 03:43) [9]

TDownloadURL


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

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


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


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

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


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

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

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


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


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

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


 
allrussia ©   (2006-12-19 07:20) [14]

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

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


 
evvcom ©   (2006-12-19 08:51) [15]

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


 
MetalFan ©   (2006-12-19 09:31) [16]

блин, да этож 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


 
Anatoly Podgoretsky ©   (2006-12-19 09:55) [17]

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

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


 
Anatoly Podgoretsky ©   (2006-12-19 09:56) [18]

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

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


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

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

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



Страницы: 1 вся ветка

Текущий архив: 2007.01.07;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.047 c
2-1166388580
Kostafey
2006-12-17 23:49
2007.01.07
Delphi-аналог окна udl


15-1166105883
ArtemESC
2006-12-14 17:18
2007.01.07
"Остров"


15-1166345397
Павел Калугин
2006-12-17 11:49
2007.01.07
Помогите студиозусу...


2-1166421292
Chelovek
2006-12-18 08:54
2007.01.07
Окна MDI.


15-1166183512
Tupoy
2006-12-15 14:51
2007.01.07
Help для Delphi