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 ?