[jachguate]

Podrías hacerlo así:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text := Edit1.Text + IntToStr(TComponent(Sender).Tag);
end;

y luego en tiempo de diseño, poner en el tag de cada botón el número que querés que añada al edit.

Un saludo.