Acceder a un TButton por su nombre

[Firewind]

Hola.
Despues de 7 años sin programar en delphi, he tenido que retomar la programacion de escritorio. El problema que tengo es que hay 60 botones y dependiendo de las acciones del usuario, debo cambiar el estado de un boton en concreto.Por ejemplo si uso la llamada MarcaBoton(boton:integer) , en la funcion tengo 60 IF, lo cual es una burrada, por lo que me gustaria saber si puedo hacer un BtnX.disabled, donde X es el valor pasado al procedimiento.
Uso Lazarus + FireBird para el proyecto.
Un saludo.