Zitat von
mirage228:
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.Tab).LocationURL;
Viele Grüße
Undefinierter Bezeichner 'Tab'