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

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

Как програмно скачать из интернета заданный файл


Aleks ©   (2005-01-17 20:56:00) 

Как програмно скачать из интернета заданный  файл
Например URL: http://www.gee.ru/pic.php?id=62553&razdel=animals&t=1105984155
какие компоненты нужны.


Aleks   (2005-01-17 22:29:00) [1]

Большое спасибо. Всего хорошего.
Вопрос закрыт. :)


palva   (2005-01-17 22:18:00) [2]

Вот теперь правильная ссылка. Кладем на форму кнопку и IdHTTP со вкладки Indy Clients.

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,
 IdTCPClient, IdHTTP;

type
 TMainForm = class(TForm)
   IdHTTP1: TIdHTTP;
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 MainForm: TMainForm;

implementation

{$R *.dfm}

procedure TMainForm.Button1Click(Sender: TObject);
var
 s: String;
 f: File of char;
 i: Integer;
begin
s := IdHTTP1.Get(' http://www.pixpapers.com/images2/space_girls_2005_1024.jpg');
AssignFile(f, 'c:\space_girls_2005_1024.jpg');
Rewrite(f);
For i:=1 to length(s) do
 Write(f, s[i]);
CloseFile(f);
end;

end.


Aleks   (2005-01-17 21:28:00) [3]

Например вот http://www.pixpapers.com/images2/space_girls_2005_1024.jpg


Aleks   (2005-01-17 21:21:00) [4]

Извените я просто дал эту ссылку для примера. Хотя сли её ввести в качалку Download Express то он её спокойно скачает.
Есть много сайтов где можно скачать простым вводом адреса картинки.


wicked   (2005-01-17 21:17:00) [5]

хм... щелкнул по ссылке... написало мне:
Вы пытаетесь скачать обои минуя страницнашего сайта! Увидеть обоюможно только перейдя к ней непосредственно с нашего сайта, т.е. нажав по её уменьшенной копии на страничке с превьюшками!
т. е., если только для этого сайта, то может не надо?.... ;)
насчет компонент - Indy или ICS, зависит от задачи, хотя в этом случае и те, и другие хороши...


Aleks   (2005-01-17 21:17:00) [6]

у меня 7 delphi пишу под windows хочеться скачивать понравившиеся картинки без лишнего бутера например
URL: http://www.gee.ru/pic.php?id=62553&razdel=animals&t=1105984155-этоодин рисунок
URL: http://www.gee.ru/pic.php?id=62553&razdel=animals&t=1105984156-Этодругой
я только начинаю писать программы Помогите пожалуйсто
если можно по подробней :).


palva   (2005-01-17 21:05:00) [7]

Зависит от того, какую вы пишете программу: консольную или Windows и какая у вас версия Delphi.


Наверх

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