PageControl spring automatisch um!

[BullsEye]

Hallo Leute, ich habe folgendes Problem:

Jedes mal wenn ich mein Anwendung starte, springt das Programm automatisch auf TabSheet2 auch wenn ich ein anderes anwähle, wechselt das nach ner Sekunde wieder zurück! Und ich finde den Fehler nicht! Im ganzen Code finde ich nichts mit Tabsheet2 oder AktivePageIndex, was darauf hindeuten kann!
Ich habe lediglich eine TreeView und eine Pagecontrol.

Und je nach dem wo ich in die TreeView klicke wird eine der 6 Tabsheets aufgerufen:

Delphi-Quellcode:

procedure TForm2.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  if (TreeView1.Selected <> nil)then
    case TreeView1.Selected.Index of
      0 : PageControl1.ActivePageIndex := 0;
      1 : PageControl1.ActivePageIndex := 1;
      2 : PageControl1.ActivePageIndex := 2;
      3 : PageControl1.ActivePageIndex := 3;
      4 : PageControl1.ActivePageIndex := 4;
      5 : PageControl1.ActivePageIndex := 5;
    end;
end;