Главная страница
    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.011 c
2-1140444833
veb
2006-02-20 17:13
2006.03.12
Русские вопросики на не русских виндах


8-1126260166
palgen
2005-09-09 14:02
2006.03.12
Если стоят две карты(TVTuner) с видеовходом ...


15-1139823152
QuasiLamo
2006-02-13 12:32
2006.03.12
Решение проблем


2-1140787477
Костя
2006-02-24 16:24
2006.03.12
Замена строки в Memo


15-1139922163
Styx_
2006-02-14 16:02
2006.03.12
Вот кому Борланд продал Delphi :)





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