Delphi 7. Taschenrechner

Hallo.
Ich programmiere gerade einen Taschenrechner in Delphi7, der erstmal addieren muss, das klappt aber nicht.
Hier ist die ganze Code:
unit ts;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
eZahl1: TEdit;
eZahl2: TEdit;
btPlus: TButton;
eResult: TEdit;
procedure btPlusClick (Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;

var
Form1: TForm1;
Zahl1: Integer;
Zahl2: Integer;
Ergebnis: Integer;

implementation

{$R *.dfm}

procedure TForm1.btPlusClick(Sender: TObject);
begin
Zahl1 := StrToInt(eZahl1.Text);
Zahl2 := StrToInt(eZahl2.Text);
Ergebnis := Zahl1 + Zahl2;
eResult.Text := IntToStr(Ergebnis);
end;


end.

Weiß jemand vielleicht, woran das Problem liegen könnte?
Danke