For-Schleife und ActivePageIndex ohn Wechsel der Seiten

[RWarnecke]

Hallo zusammen,

ich habe in einem TPageControl mehrere Seiten. In einem Button-OnClick Ereignis gehe ich jede Seite durch und führe bestimmte Aktionen aus. Das ganze mache ich über ein FOR-Schleife.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  for i := 0 to PageControl1.PageCount - 1 do
  begin
    PageControl1.ActivePageIndex := I;

    {... Weitere Aktionen in anderen Funktionen ...}

  end;
end;

In den anderen Funktionen rufe ich über eine Case-Anweisung den ActivePageIndex ab. Wenn ich jetzt die For_Schleife ausführe wechselt er alle Seiten einmal durch und das sieht etwas unschön aus. Wie kann ich das Wechsel der Reiter unterbinden ?

[mkinzler]

Den .ActivePageIndex halt nicht ändern

Delphi-Quellcode:

begin
  for i := 0 to PageControl1.PageCount - 1 do
  begin
   Funktion( PageControll.Pages[i]);

    {... Weitere Aktionen in anderen Funktionen ...}

  end;
end;

[RWarnecke]

Ähm, Dein Vorschlag funktioniert doch nicht ganz, da ich in den zusätzlichen Funktionen eine Case-Anweisung auf den ActivePageIndex habe. Oder verstehe ich da etwas falsch ?

[mkinzler]

Dann ändere die ab. Den die Ver#nderung des Index macht genau was der Name sagt, es wird der aktive Reiter gewechselt

[Klaus01]

.. wenn Du Daten und Darstellung ordentlich getrennt hast,
dann kannst Du auch den Inhalt der Seite aktualisieren wenn der User
sie aktiviert.

Grüße
Klaus

[RWarnecke]

Zitat:

Zitat von Klaus01

.. wenn Du Daten und Darstellung ordentlich getrennt hast,
dann kannst Du auch den Inhalt der Seite aktualisieren wenn der User
sie aktiviert.

Hallo Klaus,

das habe ich ja. Ich habe es jetzt dank dem Hinweis von Markus hinbekommen. Das einzigste was noch einbisschen holpert, sind meine beiden TreeViews auf zwei verschiedenen Seiten, die ich nicht aktualisiert bekomme ohne das ich die Seite aktiviere.

[alzaimar]

Dann ruf halt PageControlChanged auf, oder wo auch immer Du das Befüllen der TreeView implementiert hast. :roll: