Nehmen wir mal an, Du hast eine Variable vom Typ Integer (ganze Zahl) mit Namen ErsteZahl. Nun wird auf den Button mit der 2 geklickt. Was ist nun zu tun? ErsteZahl muss also mit 10 multipliziert werden und dann die 2 aufaddiert. Danach mit IntToStr umwandeln und im Edit darstellen. Sähe dann so aus:
Delphi-Quellcode:
procedure TFormDings.btn2Click(Sender: TObject);
begin
ErsteZahl := ErsteZahl * 10 + 2;
edtErsteZahl.Text := IntToStr(ErsteZahl);
end;
Das Ganze dann analog für die anderen Buttons. Schöner wäre es zwar, wenn man die zu addierende Zahl im Button selbst festlegen würde (Tag-Eigenschaft), dann könnte man den Sender-Parameter auswerten und bräuchte für alle Ziffernbuttons nur eine einzige Methode, aber das erscheint mir im Moment noch zu kompliziert.