![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Скачивание фалов с инета [Delphi, Windows]
Sphinxx © (2005-05-05 22:13:00)Дайте пожалуйста пример реализации скачивания файла на KOL через прокси без использования Indy желательно, т.к. поставить ее не удается.
BMouradov (2005-05-06 11:50:00) [1]Используй HTTPSend.pas Delphree - Synapse:
uses HTTPSend;
function HttpGetTextProxy(const URL: string; const Response: PStrList; ProxyHost, ProxyPort: string): Boolean;
var HTTP: PHTTPSend;
begin
HTTP := NewHTTPSend;
try
HTTP.ProxyHost := ProxyHost;
HTTP.ProxyPort := ProxyPort;
Result := HTTP.HTTPMethod('GET', URL);
Response.LoadFromStream(HTTP.Document,false);
finally
HTTP.Free;
end;
end; //HttpGetTextProxy