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

Вниз

HTTP-код->Memo   Найти похожие ветки 

← →
Trankvilizator   (2006-03-30 17:47) [0]

Есть проблема. Надо по адресу взять код и загрузить в мемо. Можно сделать с помощью WebBrowser, но тогда грузится вся страничка + картинки, а мне о4 важно быстродействие. Нашел 2 волшебных слова - Indy и NMHTTP. Но что делать с ними, не знаю)) у мя Delphi 7, и 2го(NMHTTP) вроде нету...

---

← →
SamProf ©   (2006-03-31 11:15) [1]

Берёшь IdHttp и пишешь:


unit Unit1;

interface

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

type
 TForm1 = class(TForm)
   IdHTTP1: TIdHTTP;
   Memo1: TMemo;
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Text:=IdHTTP1.Get("http:\\www.ya.ru");
end;

end.



---

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

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

Наверх

Память: 0.46 MB
Время: 0.124 c