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

← →
Степан (2008-06-16 13:43) [0]

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

← →
Ega23 © (2008-06-16 13:53) [1]

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

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

← →
Степан (2008-06-16 13:56) [2]

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

← →
{RASkov} © (2008-06-16 13:58) [3]

> [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 14:05) [4]

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

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