Also wenn ich jetzt eingebe:
Delphi-Quellcode:
procedure TForm1.ErgebnisClick(Sender: TObject);
var
Zahl1,Zahl2,Zahl3,Zahl4,Zahl5,Zahl6,Zahl7,Zahl8,Zahl9,Plus,Ergebnis: integer;
begin
Zahl1:= StrtoInt (Self.Zahl1.text);
Zahl2:= StrToInt (Self.Zahl2.text);
Bleibt das Problem dasselbe. Ich hoffe ich hab dich falsch verstanden
.
Was meinst du mit Button besser benennen? Ist das Problem nicht dasselbe wenn ich die Buttons jetzt, Button1-9 lassen würde und es dann so aussehen würde:
Delphi-Quellcode:
procedure TForm1.ErgebnisClick(Sender: TObject);
var
Button1, Button2, Button3, Button4, Button5, Button6, Button7, Button8, Button9, Plus,Ergebnis: integer;
begin
Button1:= StrtoInt (Self.Button1.text);
Button2:= StrToInt (Self.Button2.text);
end;
Danke für die schnelle Antwort.
Mfg, Ghostleader