Default TabSheet in PageControl

[EccoBravo]

Hallo,
jetzt mal ne einfache Frage.

wie kann ich zur Entwurfszeit festlegen, daß ein bestimmtes TabSheet eines PageControls beim Programmstart aktiv ist - unabhängig vom Zustand während der Entwurfszeit in dem das Projekt compiliert wurde.

Danke

E. B.

[shmia]

Zitat von EccoBravo:

wie kann ich zur Entwurfszeit festlegen, daß ein bestimmtes TabSheet eines PageControls beim Programmstart aktiv ist - unabhängig vom Zustand während der Entwurfszeit in dem das Projekt compiliert wurde.

Du kannst dich nicht waschen, ohne dich nass zu machen.
Das Tabsheet, dass in [TPagecontrol].ActivePage drinsteht, ist die Defaultseite.
Da man zur Entwicklungszeit häufig mal die Seite wechselt und dann compiliert ohne zuvor
die "richtige" Seite eingestellt zu haben, sollte man die Startseite
im Programmcode setzen:

Delphi-Quellcode:

procedure TForm1.FormCreate();
begin
   Pagecontrol1.ActivePage := TabListe;  // default seite
   // alternativ
   Pagecontrol1.ActivePageIndex := 0;
end;