Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.06.20;
Скачать: CL | DM;

Вниз

ПРИВЕТ ВСЕМ!!! Как мне зная УРЛ вернуть содержание страницы?   Найти похожие ветки 

 
@andrew ©   (2002-06-08 13:39) [0]

Есть на форме TEdit, есть TButton и есть TMemo (или что-нибудь др) Хочу в Edit1 задавать адрес, нажимать на Button1 и получать в Memo1 код страницы (типа View Source) Как мне это сделать?
Спасибо.


 
Сатир   (2002-06-08 14:52) [1]

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


var
Form1: TForm1;
http:TIdHTTP;

procedure TForm1.FormCreate(Sender: TObject);
begin
http:=TIdHTTP.Create(self);
with http do begin
ReadTimeout:=1000000;
protocolVersion:=pv1_1;
end;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
memo1.Lines.Text := HTTP.Get(edit1.text);
end;


 
Song ©   (2002-06-08 17:00) [2]

URLDownLoadToFile()



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

Текущий архив: 2002.06.20;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.014 c
4-65280
Valdem
2002-04-20 14:13
2002.06.20
Как зная ProcessID получить имя exe-файла


1-65172
Tahion
2002-06-06 20:15
2002.06.20
Как сделать невозможным копирование программы на другой компью...


14-65222
mvg_first
2002-05-16 19:44
2002.06.20
Помогите с инфой по написанию техзаданий


4-65294
Di_wind
2002-04-22 01:16
2002.06.20
ПАмять


1-65083
Reticent
2002-06-10 16:08
2002.06.20
Sender?!