[romingood]

Сообщение от Kotofff

Вопрос 1

Код:

uses activex, mshtml;
...
...
procedure TForm1.Button3Click(Sender: TObject); 
var    
  Persist : IPersistFile; 
  Document : IHTMLDocument2; 
  b :LongBool; 
begin 
  Document :=Webbrowser1.Document as IHTMLDocument2; 
  Persist := Document as IPersistFile; 
  Persist.Save('C:\temp.htm',b); 
  Memo1.Lines.Loadfromfile('C:\temp.htm'); 
end;

Потом можно в Memo1.Text искать что угодно и как угодно.

Эта замечательная штука вывела мне на одну строчку МЕМО в кучу весь html код. Не более того. Так и планировалось?
Если да, то моя цель вообще - более менее структурированно увидеть дерево элементов на страничке.

Примерно в таком виде:

document.forms.form1.submit value='Отправить'
document.forms.form1.input[1].value='Поле ввода'
document.links.link1.value='текст ссылки'
document.div(div_name).content='содержимое ДИВа'
document.forms.li[1]='текст на первом элементе списка'
Ну и т.п. думаю, идея понятна, что именно мне нужно.