Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem 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

Odpověď na otázku

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny