PageControl spring automatisch um!

[sx2008]

Ich habe dir mal deine Code etwas umgeschrieben, so dass du in der Caption des Formulars siehst,
was gerade passiert.

Delphi-Quellcode:

procedure TForm2.TreeView1Change(Sender: TObject; Node: TTreeNode);
ver
  newindex:integer;
begin
  if TreeView1.Selected <> nil then
  begin
    newindex := TreeView1.Selected.Index;
    self.Caption := Format('Debug-Info: newindex=%d  ', [newindex])+ TimeToStr(now);
    PageControl1.ActivePageIndex := newindex;  // es geht auch ohne case...of
end;

Du solltest mal schauen, ob ein Veränderung des PageControls nicht vielleicht das TreeView ändert
-> rückkopplung möglich
Hast du einen Timer auf dem Form ?