Deduzco que estás haciendo una calculadora.
Tienes diversas formas, por ejemplo, en la propiedad de cada tecla pones su número. En el tag del 1 pones un 1, en el tab del 2 pones un 2, etc.
Luego, en el evento común a todas las teclas, al hacer click, detectas su tag y actuas en consecuencia.
Código Delphi
[-]
TeclaPulsada( Sender:Tbutton );
var iTecla:int;
begin
iTecla = sender.tag;
if iTecla=1 then
...
else if iTecla=2 then
...
etc.
end;