Как отключить сделать неактивными заголовки в sPageControl?

[artemavd]

Добрый вечер! Сабж. В программе нужно сделать, чтобы заголовки табов были неактивными, а сам весь sPageControl имел свойство Enabled = True. Если ставлю свойство Enabled = False, то он становится весь неактивный, а надо, чтобы нельзя было переключать вкладки нажатием на заголовки табов. Как такое можно сделать?

[Аватар]

procedure TForm1.PageControl1Changing(Sender: TObject; var AllowChange: Boolean);
begin
  AllowChange:=False; //ставь своё условие
end;

[A-IX-2]

А скрыть их не подойдёт?

TabSheet1.TabVisible:=False;