Вниз
Скачать: CL | DM;

Клонирование   Найти похожие ветки 

 
Zaurr   (2005-01-06 19:59) [0]

Доброго времени дня.

У меня на форме есть PageControl с одной страницей. На этой странице есть одна кнопка и TWebBrowser.Мне необходимо в рантайм режиме добавлять страницы на PageControl , которые будут точными копиями первой страницы . Страницу создать получается и кнопку на ней тоже , но Вебброузер никак не хочет добавляться. Может кто-нибудь сталкивался с подобной проблемой . Подскажите как с этим бороться .
Заранее спасибо.


 
maxz ©   (2005-01-06 20:08) [1]

напишите поподробнее, что вы делаете. вместе с кодом.


 
Zaurr   (2005-01-06 20:23) [2]

Код такой,,

procedure TForm1.Button1Click(Sender: TObject);
var

 PageControl: TPageControl;
 TabSheet: TTabSheet;
 Browser:TWebBrowser;
begin

 TabSheet := TTabSheet.Create(Self);
 TabSheet.Caption := "New Page";
 TabSheet.PageControl := PageControl;

 with TButton.Create(Self) do
 begin
   Caption := "Close";
   OnClick := CloseW;
   Parent := TabSheet;
 end;

with TWebBrowser.Create(Self) do
 begin
   Caption := "New Browser";
   Parent := TabSheet;
вот здесь дельфи ругается на read only свойство,,,
 end;

нужно чтобы добавлялась новая страница , которая была бы точной копией первой , со всеми свойстввами объектов , которые расположены на первой странице


 
Piter ©   (2005-01-06 20:32) [3]

TWinControl(WebBrowser1).Parent := PageControl...


 
Piter ©   (2005-01-06 20:34) [4]

Zaurr   (06.01.05 20:23) [2]
Parent := TabSheet;
вот здесь дельфи ругается на read only свойство,,,


TWinControl(Parent) := TabSheet;

Потому что свойство визуальных компонентов Parent замещено в TWebBrowser другим свойством.


 
Zaurr   (2005-01-06 21:04) [5]

Спасибо вам .
Получилось так:

Browser:=TWebBrowser.Create(self);

with Browser  do
begin
  Caption := "New Browser";
  TWinControl(Browser).Parent:=TabSheet ;
  Align:=alClient;
end;

***


 
Grotesque   (2005-01-07 04:00) [6]

ИМХО, если ты делаешь че-нить а-ля Opera лучше сделай MDI: дизайнишь себе форму, а потом создаешь ее сколько надо раз...



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.053 c
1-1105397771
Oddin
2005-01-11 01:56
2005.01.23
Липкие окошки


6-1099066504
KirGus
2004-10-29 20:15
2005.01.23
Трабла с WebBrowser


14-1104135770
NewDelpher
2004-12-27 11:22
2005.01.23
Рэй Конопка


14-1104480576
gn
2004-12-31 11:09
2005.01.23
ПОЗДРАВЛЯЮ С НОВЫМ


1-1105008774
AGN
2005-01-06 13:52
2005.01.23
Работа с файлами и папками




   Наверх