Und wenn Du nach Möglichkeit auch gleich den Wert so in Deinem Programm weiternutzen möchtest, könntest Du es auch so machen:
mit der Formular-weiten Deklaration der Variable:
Delphi-Quelltext
Delphi-Quelltext
1: 2: 3: 4: 5:
| procedure ButtonNr4_OnClick(Sender: TObject); begin zahl:=zahl*10+4; Edit1.Text := IntToStr(Zahl); end; |
...wobei es natürlich immer schöner ist, wenn man sämtlichen Konstanten und Variablen sprechende Namen gibt - sprich:
such Dir besser gleich einen passenden Namen für Dein Edit-Feld aus.
---
Moderiert von
Narses: Beiträge zusammengefasst---
Wobei Du das ganze natürlich auch so machen könntest, dass Du nur
eine Prozedur für alle Deine Zahlenwerte schreibst, und diese dann halt bei allen Button_OnClick-Ereignissen verwendest:
Delphi-Quelltext
1: 2: 3: 4: 5:
| procedure ButtonNr_OnClick(Sender: TObject); begin zahl:=zahl*10+StrToInt((Sender as TButton).Caption)); Edit1.Text := IntToStr(Zahl); end; |
Aber fang lieber erst mal langsam an.
Sonst kommt man zu schnell an einen Punkt, wo man nicht mehr so wirklich weiterkommt und am liebsten alles hinschmeißen möchte.
- Den hatte ich auch schon öfter...