В обработчике события OnChange вашего TTabbedNotebook разместите код примерно такого содержания:
if (NewTab = 0) and (IWantToDisableTab0) then
AllowChange := False;
if (NewTab = 1) and (IWantToDisableTab1) then AllowChange := False; ... |
Да, можно использовать конструкцию Case, но If в данном случае я посчитал удобнее. [001529]