Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi erstellen von einem TWebBrowser (https://www.delphipraxis.net/11981-erstellen-von-einem-twebbrowser.html)

Goldorak 18. Nov 2003 11:24


erstellen von einem TWebBrowser
 
Hallo,

Ich habe jetzt etlisches versucht aber es will nicht ! :wall:
Ich will so etwa erreichen, was es beim Netscape Navigator gibt :
Ich erstelle TTabSheets dynamisch in ein TPageControl (Kontextmenü), und will ein TWebBrowser rein machen :

Delphi-Quellcode:
   wTS:=TTabSheet.Create(Self) ;
   wTS.PageControl := MyPageControl;
   wTS.Caption := '(none)';

   wWB:=TWebBrowser.Create(wTS);
   wWb.Align:=alClient;
   wWB.Navigate('http://www.google.com');
aber es zeigt mir kein WebBrowser an !
Und doch gibt es Ihn !
Ich habe diese angefügt :

Delphi-Quellcode:
   for n:=0 to wTS.ComponentCount-1 do
   Begin
      ShowMessage(wTS.Components[n].ClassName);
      if wTS.Components[n]=wWB then ShowMessage('Ich bins !');
   End;
Gibt es eine Erklärung dazu ?

[edit=Daniel B]Delphi-Tags eingefügt. Mfg, Daniel B[/edit]

Goldorak 18. Nov 2003 12:17

Re: erstellen von einem TWebBrowser
 
Hab's eben mit 'ne ähnlische Frage auf swissdelphicenter rausgefunden :

wWB:=TWebBrowser.Create(wTS);
TOLEControl(wWB).Parent:=wTS;

Nicht alles kapiert, aber es funktionniert !
Danke an alle die schon an der Lösung gesucht haben :lol:


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:41 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz