Господа!
Буду премного благодарен, если кто-нибудь подскажет как программно получить текст в виде html из компонента WebBrowser, расположенного на форме.

Здравствуйте, Anton_DT, Вы писали:

A_D>Господа!
A_D>Буду премного благодарен, если кто-нибудь подскажет как программно получить текст в виде html из компонента WebBrowser, расположенного на форме.

Через интерфейс к IE ActiveX, который борланд специально оставил для такого рода целей.
Если не до конца понятно — читай MSDN.

Здравствуйте, mikkri, Вы писали:

M>Через интерфейс к IE ActiveX, который борланд специально оставил для такого рода целей.
M>Если не до конца понятно — читай MSDN.

Дело в том, что MSDN я читал, к моему большому сожалению мало что понял.
Наверно потому, что С я практически не знаю, а все полезные примеры там на С.

Я так понял, что надо пользоваться каким-то образом интерфейсом IDispatch, но
для этого необходимо знать Globally unique identifiers (GUIDs) для методов или объектов, чтобы вызывать метод Invoke.

Но где взять GUID ?

Здравствуйте, Anton_DT, Вы писали:

A_D>Здравствуйте, mikkri, Вы писали:

M>>Через интерфейс к IE ActiveX, который борланд специально оставил для такого рода целей.

См. TWebBrowser.Document и
TWebBrowser.ControlInterface или TWebBrowser.DefaultInterface

И учись пользоваться хелпом.

Здравствуйте, mikkri, Вы писали:

M>>>Через интерфейс к IE ActiveX, который борланд специально оставил для такого рода целей.

M>См. TWebBrowser.Document и
M>TWebBrowser.ControlInterface или TWebBrowser.DefaultInterface

M>И учись пользоваться хелпом.

Спасибо конечно за дельный совет, справился своими силами.

Здравствуйте, Anton_DT, Вы писали:
A_D>Спасибо конечно за дельный совет, справился своими силами.
А как, не поделитесь?

Здравствуйте, Rook, Вы писали:

R>Здравствуйте, Anton_DT, Вы писали:
A_D>>Спасибо конечно за дельный совет, справился своими силами.
R>А как, не поделитесь?

С удовольствием.

Моя проблема была в том что я не подключил модуль MsHtml.
А дальше все как в сказке:

var HTMLDoc : IHTMLDocument2;

begin
WebBrowser.Document.QueryInterface(IID_IHTMLDocument2,HTMLDoc);
htmlEl_colection := HTMLDoc.all;
HTMLElement := htmlEl_colection.item(0,0) as IHTMLElement;

 ... HTMLElement.outerHTML
 ... HTMLElement.innerHTML