Текущий архив: 2005.10.16;
Скачать: CL | DM;
Вниз
Как обратится к свойствам компонента??? Найти похожие ветки
← →
Vardoulacha (2005-09-15 08:11) [0]вообщем смысл такой:
1) есть PageControl на нем динамически создается TabSheet
2) на TabSheet помещается с помощью InsertControl(Frame); фрейм на котором находится компонент TWebBrowser с именем WB
3) то есть например динамически создали несколько TabSheet с помещенными на них WebBrowser
сам вопрос в следующем: как мне обратится к компоненту WebBrowser (например сделать ему Navigate) который находится на том TabSheet который в данный момент активен?
← →
Vardoulacha (2005-09-15 11:33) [1]все заработало выкинул нафиг Frame пошел он куда подальше (зато приобрел опыт его использования) динамически создаю WebBrowser (раньше тоже сначала сделал динамически создание но потом столкнулся с проблемой как к нему обратится) но теперь научился сейчас расскажу как это сделать:
создание всего что надо :)
procedure TMainForm.butNewClick(Sender: TObject);
var
TabSheet: TAdvTabSheet;
j: Integer;
Flags: OLEVariant;
WB: TWebBrowser;
begin
TabSheet:=TAdvTabSheet.Create(Self);
TabSheet.AdvPageControl:=PageWindows;
WB:=TWebBrowser.Create(Self);
with WB do begin
Align:=alClient;
Navigate("file:///C:/untitled.html", Flags, Flags, Flags, Flags);
end;
with TabSheet do begin
InsertControl(WB);
Caption:="123";
ShowClose:=True;
OnCanClose:=CloseSheet;
end;
inc(i);
end;
ну и соответственно обращение к тому браузеру который активен
procedure TMainForm.Button1Click(Sender: TObject);
var
Flags: OLEVariant;
TS: TAdvTabSheet;
begin
TS:=PageWindows.ActivePage;
(TS.Controls[0] as TWebBrowser).Navigate("file:///C:/file.htm", Flags, Flags, Flags, Flags);
end;
у меня на табе только один контрол поэтому нет перебора и проверки компонентов
← →
msguns © (2005-09-15 14:56) [2]Только вот непонятно, за что был убит ни в чем не винный фрэйм ?
Обращение к "нужному" объекту из энного кол-ва динамически созданных из одного класса, легко и просто через св-во Screen.ActiveControl с явным преобразованием к типу объекта
Страницы: 1 вся ветка
Текущий архив: 2005.10.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.027 c
