Taschenrechner mit Delphi für Schule!

[Yanni]

Hallo, wir sollen en Taschenrechner in Delphi schreiben (also eig nur in pascal ,aber das war mir zu einfach, hab mich an delphi gehockt)
Jetz hab ich das Problem das mir die Fehlermeldung kommt:
[Fehler] Unit1.pas(49): Es gibt keine überladene Version von 'IntToStr', die man mit diesen Argumenten aufrufen kann
[Fehler] Unit1.pas(53): ';' erwartet, aber '.' gefunden
[Fehler] Unit1.pas(55): Deklaration erwartet, aber Dateiende gefunden
[Fehler] Unit1.pas(22): Ungenügende Forward- oder External-Deklaration: 'TForm1.Memo1Change'
[Fataler Fehler] Project1.dpr(5): Verwendete Unit 'Unit1.pas' kann nicht compiliert werden

Hab ma alle fehler reingeschrieben, weil ich mir net sicher bin,was davon zuu gebrauchen ist.
Und hier der Quelltext dazu

Delphi-Quellcode:

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Button1: TButton;
    Edit3: TEdit;
    Label5: TLabel;
    Label6: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure Memo1Change(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var zahl1, zahl2,ende: integer;
    ergebnis: real;
    opperator: integer;
begin
zahl1 := StrToInt(Edit1.Text);
zahl2 := StrToInt(Edit2.Text);
opperator := StrToInt (Edit3.Text);
case opperator of
1: ergebnis := zahl1 + zahl2;
2: ergebnis := zahl1 - zahl2;
3: ergebnis := zahl1 * zahl2;
4: ergebnis := zahl1 / zahl2;
   Label4.Caption := IntToStr(ergebnis);
end;

   read(ende);
end.

Vielen Dank für eure Antworten