Einfaches Addieren +3

[JackTheRipper]

Danke!
Hat geklappt!

Delphi-Quellcode:

var x,y: integer;
procedure TForm1.Button1Click(Sender: TObject);
begin
 x := strtoInt(zahl1.text);
 y := strtoInt(zahl1.Text);


 y := x +3;


ShowMessage(IntToStr(y));