Текущий архив: 2003.11.03;
Скачать: CL | DM;

Вниз

Align на PageControl   Найти похожие ветки 

← →
Rentgen ©   (2003-10-22 07:31) [0]

Мастера! Подскажите:
Не работает Align на созданном компоненте в Run-time:
web:=TWebBrowser.Create(self);
web.ParentWindow:=PageControl1.Pages[0].Handle;
web.Align:=alClient;

Может че-то с ParentWindows"ом ?

---

← →
MBo ©   (2003-10-22 08:05) [1]

А просто Parent вместо ParentWindow не попробуешь?

---

← →
Rentgen ©   (2003-10-22 19:46) [2]

Почему-то Parent у TWebBrowser имеет свойства Read-only.

---

← →
Vl@d   (2003-10-23 03:55) [3]

Да, действительно Read-only...Хм.

---

← →
Zergling ©   (2003-10-23 08:17) [4]

Вроде работате :)

procedure TForm1.Button1Click(Sender: TObject);
var
BBB: TWebBrowser;
Flags: OLEVariant;
begin
BBB := TWebBrowser.Create(Form1);
bbb.ParentWindow := TabSheet1.Handle;
bbb.Align := alClient;
bbb.ShowHint := true;
bbb.Hint := "dddddddddddddddd";
Flags := 0;
bbb.Navigate(WideString("DX.TXT"), Flags, Flags, Flags, Flags);
end;

---

Страницы: 1 вся ветка

Текущий архив: 2003.11.03;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.021 c