Rechenprogramm

[dtos]

Sieht bei mir jetzt so aus funktioniert aber trotzdem nicht:

Delphi-Quellcode:

 procedure TForm1.Button1Click(Sender: TObject);

var zahl1, zahl2, ergebnis : integer;

begin

Zahl1 := StrToInt(Edit1.Text);
Zahl2 := StrToInt(Edit2.Text);

ergebnis := Zahl1+Zahl2;

Label3.Caption := Inttostr(ergebnis);


end;