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

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

Программно поместить TWebBrowser

Степан ©   (2008-06-16 13:43:00) 

Возникла неожиданная проблема, подскажите пожалуйста, как программно создать работающий экземпляр TWebBrowser на форме?

---

Степан   (2008-06-16 14:05:00) [1]

Спасибо, навели на ошибку - я сразу запрещал переходы по страницам, бошка плохо ночью соображает

---

{RASkov}   (2008-06-16 13:58:00) [2]

> [2] Степан   (16.06.08 13:56)

procedure TForm1.Button1Click(Sender: TObject);
var
br : TWebBrowser;
begin
br := TWebBrowser.Create(Self);
TWinControl(br).Parent := Self;
br.SetBounds(0,0,500,500);
br.Navigate('www.delphimaster.ru');
end;

---

Степан   (2008-06-16 13:56:00) [3]

Не работает. Белый прямоугольник на окне возникает, но если попытаться вызвать метод Navigate, то ничего не происходит

---

Ega23   (2008-06-16 13:53:00) [4]

Думается, как и любой другой контрол:

var
 br : TWebBrowser;
begin
 br := TWebBrowser.Create(Self);
 br.Parent := Self;
 br.SetBounds(0,0,500,500);
end;

---

Наверх