Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2007.01.21;
Скачать: [xml.tar.bz2];

Вниз

Как с помощью компонента TIdHTTP получить файл с Интернета?   Найти похожие ветки 

 
Yuron   (2006-08-04 09:22) [0]

Чтобы получить код странички в интернете с помощью компонента Indy TIdHTTP пишется например memo1.text:=IdHTTP.get("http://www.ya.ru");
А как мне с помощью этого же компонента скачать файл с сети?


 
umbra ©   (2006-08-04 10:29) [1]

процедура может быть такой
procedure GetFile(URL, fullfilename: string);
var
str: TFileStream;
begin
 try
  str := TFileStream.Create(fullfilename);
  IdHTTP1.Get(URL, str);
 finally
  str.Free;
 end;
end


вызывать ее так
GetFile("http://www.ya.ru/my.zip", "c:\my.zip");


 
Virgo_Style ©   (2006-08-22 21:31) [2]

umbra ©   (04.08.06 10:29) [1]
интересная функция)



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

Форум: "Сети";
Текущий архив: 2007.01.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.037 c
1-1164618057
*Ray*
2006-11-27 12:00
2007.01.21
Всплывающая панель


15-1167581182
ArtemESC
2006-12-31 19:06
2007.01.21
-∞ =>... => 1 => 2 => ... => 2006 => !! => 2007 => .... => +∞


2-1167922229
ale2
2007-01-04 17:50
2007.01.21
Как задать такую константу


2-1167283938
Сергей Ю
2006-12-28 08:32
2007.01.21
Найти запись в бд во всех полях


15-1167233205
Parus
2006-12-27 18:26
2007.01.21
Новый год





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский