Turbo Delphi - Přístup ke komponentám
Dobrý den,
na formuláři je PageControl. Na každém jeho TabSheetu se dynamicky vytváří buď jedna komponenta (TWebBrowser) nebo devatenáct komponent (9xTImage,9xTLabel,TWebBrowser). Často k TWebBrowseru přistupuji (Navigate, Visible). Jak přistupovat? (TWebBrowser je vždy poslední)
Přistupuji přes vlastní funkci:
GetBrowser(Index);
Index udává, na kterém TabSheetu je onen WebBrowser (který TabSheet je jeho parent). Samotná funkce vypadá takto:
Result:=PageControl1.Pages[Index].Controls[PageControl1.Pagec[Index].ControlCount];
S touto funkcí s WebBrowserem pracuji jako s TComponent a ne jako s TWebBrowser. Jak mám funkci změnit, abych pracoval rovnou s TWebBrowser?Moje snahy byly doposud marné:
Result:=TWebBrowser(PageControl1.Pages[Index].Controls[PageControl1.Pagec[Index].ControlCount]);
Result:=PageControl1.Pages[Index].Controls[PageControl1.Pagec[Index].ControlCount] as TWebBrowser;
Děkuji