Duvidas Calculadora semelhante a do Windows

[ardamaxfly]

Amigos estou tendo problemas para implementar uma calculadora semelhante a do windows.

1º - Quero que quando o usuário use o teclado númerico as entradas sejam adicionadas no display assim como se teclase nos botões da aplicação com o mouse. Além disso gostaria que o foco fique no ultimo botão clicado. Ouvir falar alguma coisa a respeito de mascaras, segue exemplo abaixo:

procedure TFdCalc.FormKeyPress(Sender: TObject; var Key: Char);

begin

case key of

#48, #96: Bt0.OnClick(Sender);

#49, #97: Bt1.OnClick(Sender);

#50, #98: Bt2.OnClick(Sender);

#51, #99: Bt3.OnClick(Sender);

#52, #100: Bt4.OnClick(Sender);

#53, #101: Bt5.OnClick(Sender);

#54, #102: Bt6.OnClick(Sender);

#55, #103: Bt7.OnClick(Sender);

#56, #104: Bt8.OnClick(Sender);

#57, #105: Bt9.OnClick(Sender);

#107, #43: BtSoma.OnClick(Sender);

#45, #30, #150, #151, #109, #189: BtMsubtracao.OnClick(Sender);

#111, #47: Btdivisao.OnClick(Sender);

#106, #42: BtMultiplicacao.OnClick(Sender);

#37: BtPorcentagem.OnClick(Sender);

#13, #187: BtIgual.OnClick(Sender);

#8: Btspace.OnClick(Sender);

end;

end;

Se o código assima estiver correto, alguém poderia fazer a gentileza de explicar ou completar.

2º- Existe maneira semelhante a que irei propor para corrigir o erro que é dado quando é digitado numa variavél do tipo inteiro caracteres de A..Z ou string.

Pensei no seguinte:

if numero = integer then begin

<instruções >

else

<instruções>

end;

Obrigado a todos, mesmo aqueles que só leram o post.