Я так понял, нужно при нажатии кнопки появлялась цифра 4 на дисплее калькулятора (edit), то можно таким способ, создается переменная строка, и в неё записывается цифра, единственное чтоб её вытащить оттуда нужно перевести из строки в число.
Код:
var s: string;// гллобальную переменную
procedure TForm1.Button1Click(Sender: TObject);
begin
s:=s+'4';//при нажатии присваиваем переменной s ='4'
// при послед. нажатии s='44' и т.д.
form1.edit.text:=s;//отображаем что находится в переменной s
end;
// вытащить цифры можно с помощью strtoint(s); strtofloat(S) и т.д.
а если нужно имитировать нажатие кнопки, например в стандартном калькуляторе то используй
PressingKeyboard(VK_RETURN,0) // нажатие клавиши enter с клавиатуры (vk_return)