| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

browser

beginners ©   (2004-09-07 15:13:00) 

как по вашему решить следуюшую проблему: допустим, в браузере (компонент класса twebbrowser)загружен html файл, можно ли програмно добавить в отображаемый документ какой нибудь текст?
Заранее благодарю.

---

easy   (2004-09-07 19:04:00) [1]

<!--start html-->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#ABB4CB">
<table width="200" border="1" align="center" bgcolor="#CCCCCC">
 <tr>
   <td bgcolor="#EFEFEF">
<div align="center" id="up">Delphi</div></td>
 </tr>
 <tr>
   <td bgcolor="#EFEFEF">
     <div align="center" id="down"> </div></td>
 </tr>
</table>
</body>
</html>
<!--end html-->

procedure TForm1.Button1Click(Sender: TObject);
begin
 WebBrowser1.OleObject.document.all.up.insertAdjacentHTML('BeforeEnd','master');
 WebBrowser1.OleObject.document.all.down.innerHtml:='<a href=" http://delphimaster.ru" target="_blank">Click me!</a>';
end;

---

Наверх