Подскажите, в чем ошибка?

← →
Guest_01 (2005-01-10 17:33) [0]

В цикле создаю табы и twebbrowser, у броузеров align=alClient, но при изменении размера формы размер броузеров не меняется, почему???

tab:=ttabsheet.Create(pagecontrol1);
tab.PageControl:=pagecontrol1;
tab.TabVisible:=true;
tab.Caption:="0";

wb:=twebbrowser.create(tab);
wb.Align:=alClient;
wb.parentwindow:=tab.Handle;
wb.OnDocumentComplete:=form1.WebBrowser1.OnDocumentComplete;

wb.Left:=0;
wb.top:=0;
wb.Width:=tab.Width;
wb.height:=tab.height;
wb.Visible:=true;

wb.Navigate(link);

← →
olookin © (2005-01-10 18:50) [1]

wb.Align:=alClient;
wb.parentwindow:=tab.Handle;

Предлагаю поменять местами эти две строчки...

← →
Guest_01 (2005-01-10 19:00) [2]

пробовал - результат такой-же

> Guest_01 (10.01.05 17:33)

Замените строку

> wb.parentwindow:=tab.Handle;

на

TControl(wb).Parent := tab;

Подскажите, в чем ошибка? Найти похожие ветки