Boton que funcione como Backspace

[Julio César]

Estoy haciendo una calculadora basica semejante a la de windows y quiero saber como hacer el boton Backspace.

Gracias Anticipadas.

[acertij022]

suponiendo que tenes un label para ver el numero ingresado seria algo asi:

procedure TForm1.Button1Click(Sender: TObject);
begin
label1.Caption:=copy(label1.Caption,1,length(label1.Caption)-1);
end;

espero aberte ayudado
salu2