tabsheet deaktivieren

[Björn Ole]

So in etwa?

Delphi-Quellcode:

procedure TForm1.PageControl1Change(Sender: TObject);
begin
  if PageControl1.ActivePageIndex = 1 then
    PageControl1.SelectNextPage(true);
end;