Fórum TreeView (Urgente) #170876
22/07/2003
0
Eu ja fiz com que os (nó) do treeview acesse a tabcontrol agora como eu faço para que os nó apenas visualizem uma tabcontrol de cada vez
exemplo
procedure TFPlanilha.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
if TreeView1.Selected.Index = 0 then
TabControl1.Visible := true
else
if TreeView1.Selected.index = 1 then
TabControl2.Visible := true
else
if TreeView1.Selected.index = 2 then
TabControl3.Visible := true
else
if TreeView1.Selected.index = 3 then
TabControl4.Visible := true;
end;
Obs so que desta forma eu click uma vez, quando click no mesmo (no) ele não chama o tabcontrol1 fica no tabcontrol que eu click por ultimo
exemplo
procedure TFPlanilha.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
if TreeView1.Selected.Index = 0 then
TabControl1.Visible := true
else
if TreeView1.Selected.index = 1 then
TabControl2.Visible := true
else
if TreeView1.Selected.index = 2 then
TabControl3.Visible := true
else
if TreeView1.Selected.index = 3 then
TabControl4.Visible := true;
end;
Obs so que desta forma eu click uma vez, quando click no mesmo (no) ele não chama o tabcontrol1 fica no tabcontrol que eu click por ultimo
Edinydia
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)