Цитата:
Сообщение от MultiVan
а на дельфи какой код?
|
примитивный:
Код:
uses
NumLock,
type
TForm1 = class(TForm)
Button1: TButton;
Memo1: TMemo;
procedure Button1Click(Sender: TObject);
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Text:=innerHTML(917906);
end;
917906 - это HWND окна класса Internet Explorer_Server
возвращает исх. текст страницы
http://data.cod.ru/124916