TreeView (Urgente)

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