Registriert seit: 23. Mär 2003
Ort: Münster
3.750 Beiträge
Delphi 2010 Professional
|
Re: Problem mit PageControl
16. Jun 2009, 18:15
Ah, jetzt habe ich es verstanden.
Du könntest beim Erzeugen den TWebBrowser dem TTabSheet zuordnen:
TabSheet.Tag := Integer(WebBrowser);
Und dann im OnChange des PageControls schreibst Du einfach:
Edit1.Text := TWebBrowser(PageControl1.ActivePage.Tag).LocationURL;
Viele Grüße
Edit: Rechtschreibfehler
David F.
May the source be with you, stranger.
PHP Inspection Unit (Delphi-Unit zum Analysieren von PHP Code)
|