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

Вниз

Первая попытка подключения к инернету   Найти похожие ветки 

 
veb   (2006-02-22 17:01) [0]

Здравствуйте!
Ужасно наивный вопрос, но для этого и сделана эта ветвь, не правда ли?
Мне необходимо, получать в TStringList содержимое web-страницы с указанного адреса. Никогда раньше не писал ничего подобного, поэтому посмотрел статьи здесь на сайте и в других конференциях. Везде подразумевается, что уже есть минимальные знания. Посему, подскажите, с чего начать? Какие компоненты надо расположить в приложении? Есть ли какие-то хитрости? (например связанные с прокси)
Буду благодарен за любую информацию, в том числе и ссылку на статью вида: "С чего начать?"


 
Zeqfreed ©   (2006-02-22 17:25) [1]

Посмотри http://delphimaster.net/view/2-1139078593/&toprint=1
Если есть какие-то конкретные вопросы, то задавай.


 
veb   (2006-02-22 17:51) [2]

Огромное спасибО!
правда у меня пока ничего не получилось, потому что выход в инет через прокси, а в предложенных компонентах пока не нашел как это настроить.


 
Кефир87 ©   (2006-02-22 18:36) [3]

http://cwdev.mykm.ru/index.php?pg=progs


 
Плохиш ©   (2006-02-22 18:37) [4]

Используй TidHTTP


 
veb   (2006-02-22 19:01) [5]

to Плохиш
 именно его и пытаюсь использовать! Получаю все время ошибку!

procedure TForm1.Button1Click(Sender: TObject);
var _qwe:TStringList;
begin
_qwe:=TStringList.Create;
_qwe.add("test");
IdHTTP1.ProxyParams.ProxyPort:=3128;
IdHTTP1.ProxyParams.ProxyServer:="192.168.39.10";
IdHTTP1.Post("http://delphimaster.ru",_qwe);

Memo1.text:=IdHTTP1.ResponseText;
_qwe.Clear;
end;

HTTP/1.0 407 Proxy
Proxy Authentication Required

Может у кого пример есть? а? Я пониаю, что за час все не получится, но хочется чтоб хоть что-нибудь заработало


 
Плохиш ©   (2006-02-22 19:15) [6]


> HTTP/1.0 407 Proxy
> Proxy Authentication Required

Я так понимаю, прокси требует авторизацию. Или сделай BasicAuthentication := true.

> IdHTTP1.Post("http://delphimaster.ru",_qwe);

Может с Get начать?


 
Плохиш ©   (2006-02-22 19:28) [7]


procedure TForm1.Button1Click(Sender: TObject);
var
   streamResponse: TMemoryStream;
begin
 IdHTTP1.ProxyParams.BasicAuthentication := true;
 IdHTTP1.ProxyParams.ProxyPort:=3128;
 IdHTTP1.ProxyParams.ProxyServer:="192.168.30.12";
 IdHTTP1.ProxyParams.ProxyUsername:="xxx";
 IdHTTP1.ProxyParams.ProxyPassword:="xxx";
 streamResponse := TMemoryStream.Create;
 try
   IdHTTP1.Get("http://delphimaster.ru", streamResponse);
   streamResponse.Position := 0;
   Memo1.Lines.LoadFromStream(streamResponse);
 finally
   streamResponse.Free;
 end;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
15-1140263782
Pazitron_Brain
2006-02-18 14:56
2006.03.12
Подскажите книгу по мотивам Half-Life


2-1140779871
Saveliy
2006-02-24 14:17
2006.03.12
Соединение с интернетом


15-1140363552
Cerberus
2006-02-19 18:39
2006.03.12
Помогите выбрать мобилу.


2-1140985062
Vitalik__
2006-02-26 23:17
2006.03.12
Перевод значения String в число.


2-1140530847
Korefey
2006-02-21 17:07
2006.03.12
преобразование числа в строку





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский