Taschenrechner?

[Kallypey]

Habs gerade mal damit probiert allerdings makiert der mir immer ne' Zeile rot und "meckert" rum
ICh hab erstmal verschiedene Varianten versucht aber nichts hilft... Welche Zeichen muss für mal und geteilt einsetzen?

PS: "zahl1 := StrToFloat(Edit1.Text);" macht der mir immer rot.

Delphi-Quellcode:

unit Unit1;

interface

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

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

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  zahl1, zahl2, ergebnis: Integer;
begin
  zahl1 := StrToInt(Edit1.Text);
  zahl2 := StrToInt(Edit2.Text);
  ergebnis := zahl1 + zahl2;
  Label4.Caption := IntToStr(ergebnis);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  zahl1, zahl2, ergebnis: Integer;
begin
  zahl1 := StrToFloat(Edit1.Text);
  zahl2 := StrToFloat(Edit2.Text);
  ergebnis := zahl1 * zahl2;
  Label4.Caption := FloatToStr(ergebnis);

end;

end.