Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem Turbo Delphi - Přístup ke komponentám

S tou premennou deklarovanou vo vnútri triedy ako private to nepôjde...(musíš pozrieť jeho staršie predchádzajúce príspevky, čo ako vytvára/ruší za behu programu)
a za druhé: aj tak by si nemohol pristupovať ku jednotlivým wb cez jednu premennú, keď práve neukazuje na konkrétnu inštanciu (fuj aké slovo...:-)).

Ja by som môj kód ešte poupravil:

var
  i: Integer;
begin
  with PageControl.ActivePage do
  for i = 0 to ControlCount -1 do
  begin
    if Controls[i] is TWebBrowser then 
     begin
       Result := TWebbrowser(PageControl.ActivePage.Controls[i];
       Exit;  
     end;
  end; 
end;

Reakce na odpověď

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

Zpět do poradny