
09.02.2010, 14:40
|
|
Познающий
Регистрация: 15.03.2009
Сообщений: 87
С нами:
9030319
Репутация:
34
|
|
PHP код:
procedure TForm4.Button2Click(Sender: TObject);
var StrPage, ssylka:string;
Data:TstringList;
begin
idhttp1.HandleRedirects:=true;
StrPage:=idhttp1.Get('http://ya.ru);
StrPage:=idhttp1.Post(ssylka, Data);
Memo2.Lines.Text := StrPage;
Data.Free;
Как допустим получить в label1 то что находится в скобках <title> НУЖНО ЧТОБ ЭТОТ ТЕКСТ ВЫВЕЛО В MEMO1</title>
Последний раз редактировалось 090808; 09.02.2010 в 14:42..
|
|
|