Программно создать TWebBrowser

← →
BBCHa © (2004-01-30 14:58) [0]

Появилась необходимость программно создавать TWebBrowser. Пишу следующий код:
WebBrowser:=TWebBrowser.Create(TabSheet); WebBrowser.Left:=0; WebBrowser.Top:=41; WebBrowser.Height:=405; WebBrowser.Width:=670; WebBrowser.Parent:=TabSheet; WebBrowser.Name:="WebBrowser"; WebBrowser.OnProgressChange:=WebBrowserProgressChange; WebBrowser.OnDownloadComplete:=WebBrowserDownloadComplete;
Сложность в том, что не могу задать Parent. При компиляции говорит, что это свойство Read-only. Тем не менее, если не задавать парент - WebBrowser, как и предполагалось не отображается. Может кто то делал что то подобное, подскажите, народ.

← →
Piter © (2004-01-30 15:44) [1]

>При компиляции говорит, что это свойство Read-only

приведи код и напиши что пишет компилятор (что за ошибка точно)

← →
BBCHa © (2004-01-30 15:53) [2]

ну Ctrl+F9 топчешь, а оно и говорит: Cannot assign to a read-only property

← →
SergP © (2004-01-30 16:57) [3]

TOleControl(webbrowser).Parent := ...

спасибо. Ступил...

Browser:= TWebBrowser.Create(self);
Browser.Align := alClient;
Form1.InsertControl(Browser); //иначе Align не работает, почему-то
Browser.Visible := true;
Browser.Navigate("about:blank");

Программно создать TWebBrowser Найти похожие ветки