![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
HTTP-код->Memo [D7, WinXP]
Trankvilizator © (2006-03-30 17:47:00)Есть проблема. Надо по адресу взять код и загрузить в мемо. Можно сделать с помощью WebBrowser, но тогда грузится вся страничка + картинки, а мне о4 важно быстродействие. Нашел 2 волшебных слова - Indy и NMHTTP. Но что делать с ними, не знаю)) у мя Delphi 7, и 2го(NMHTTP) вроде нету...
SamProf (2006-03-31 11:15:00) [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.