Seleccionar componente dentro de Tabsheet
Publicado por Ivan (4 intervenciones) el 28/12/2005 20:43:07
Hola y gracias de antemano por la ayuda:
Tengo un PageControl que dentro del mismo se crean Tabsheets EN TIEMPO de ejecucion, dentro de los tabsheets creo TWebBrowsers, esto con el siguinte codigo
bien, una vez agregada las pestañas quiero saber que pestaña o Tabsheet esta seleccionado para asi, al WebBrowser que esta dentro del Tabsheet le doy la pagina que se ingresa en un combobox, el problema esta que no puedo llegar hasta el WebBrowser, puedo identificar la pestaña seleccionada pero no puedo llegar a ponerle codigo al WebBrowser. Quizas el problema este en el parent, pero [delphi]navegador.Parent [delphi] no le puedo asignar propiedades ya que el compilador dice que es una propiedad de solo lectura. Espero con ansias una respuesta.
Tengo un PageControl que dentro del mismo se crean Tabsheets EN TIEMPO de ejecucion, dentro de los tabsheets creo TWebBrowsers, esto con el siguinte codigo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.NuevaPestana;var
Nueva: TTabSheet; navegador : TWebBrowser;begin
Nueva := TTabSheet.Create (tabz); //tabz es el PageControl
Nueva.Visible := True;
Nueva.Caption := 'Nueva Pestaña';
Nueva.PageControl := tabz;
tabz.ActivePage := Nueva;
TWinControl(Nueva).Name := 'MyWebBrowser'+inttostr(Nueva.TabIndex);
navegador := TWebBrowser.Create(Self);
TWinControl(navegador).Parent := Nueva;
Align:=alClient;
TWinControl(navegador).Name := 'MyWebBrowser'+inttostr(Nueva.TabIndex);
bien, una vez agregada las pestañas quiero saber que pestaña o Tabsheet esta seleccionado para asi, al WebBrowser que esta dentro del Tabsheet le doy la pagina que se ingresa en un combobox, el problema esta que no puedo llegar hasta el WebBrowser, puedo identificar la pestaña seleccionada pero no puedo llegar a ponerle codigo al WebBrowser. Quizas el problema este en el parent, pero [delphi]navegador.Parent [delphi] no le puedo asignar propiedades ya que el compilador dice que es una propiedad de solo lectura. Espero con ansias una respuesta.
Valora esta pregunta
0