Отображение HTML на экранной форме

Для отображения HTML странички следует воспользоваться компонентом TWebBrowser. Создадим чистую форму и расположем на ней два компонента:

1. usrg_WB типа TWebBrowser
2. usrg_Btn типа TButton

Напишем обработчик события OnClick для кнопки usrg_Btn:

<sourcehighlight lang="vbnet"> Option Explicit Sub usrg_BtnOnClick(ByVal Sender)

 Dim WB, Doc
 Set WB = Sender.OwnerForm.GetComponent("usrg_WB")
 Set Doc = WB.Document
 
 Doc.Body.InnerHTML = _

"

Привет из Гедымина!

<p/><img src="""" />"

End Sub </sourcehighlight>

По нажатию на кнопку в поле веб браузера будет отображаться фраза "Привет из Гедымина!" и загружаться изображения с сайта компании Golden Software.