PDA

Ver la Versión Completa : componentes Treeview y Pagecontrol


amell2020
14-05-2012, 05:44:04
Hola amigo que tal, estoy tratando de usar los componentes Treeview y Pagecontrol.

Tengo Treeview como el menus de cada formulario
PAgecontrol lo quiero este mostrando los fomulario del Treeview.

Yo pense en crear todas pestañas del Pagecontrol y luego ocultarla y con el treeview y mostrando la que quiero y la verdad no pude hacer nada amigos, Alguien me puede dar una ayuda por favor con ejemplo?? se lo agradecere.

ecfisa
14-05-2012, 06:15:13
Yo pense en crear todas pestañas del Pagecontrol y luego ocultarla y con el treeview y mostrando la que quiero

Hola amell2020.

Si no te entendí mal, podrías hacer parecido a:

...
(* Oculta los todos los TTabSheet de un TPageControl *)
procedure MakeTabSheetInvisible(PageControl: TPageControl);
var
i: Integer;
begin
with PageControl do
for i:= 0 to PageCount-1 do
Pages[i].TabVisible:= False;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
MakeTabSheetInvisible(PageControl1); // ocultar al iniciar
end;

...

(* Mostrar selección del TreeView *)
procedure TForm1.TreeView1Click(Sender: TObject);
begin
MakeTabSheetInvisible(PageControl1); // ocultar
PageControl1.Pages[TreeView1.Selected.Index].TabVisible:= True; // Hacer visible la seleccion del TreeView
end;

Tomá en cuenta que es sólo para darte una idea. El código podría variar de acuerdo como esté diagramado tu TreeView...

Saludos.