Desabilitar un TabSheet

[dmassive]

Muchas gracias, estoy intentando usar un case, pero en vez de usar los indices, utilizar los nombre de las paginas. Esto es por si luego decido agregar o quitar pestañas, cambiar posicion, etc.

Aun estoy pensando como hacerlo para que funcione mas o menos asi:

Código Delphi [-]
  case PageControl1.ActivePage of
    tabsheet_mia: form1.caption := 'funciona!'
  end;