Ich habe keine Ahnung vom Programmieren und muss bis morgen (12.01.17) ne Aufgabe abgegeben haben. Ich habe mich für einen Rechner entschieden der den Spritverbrauch errechnen soll ganz einfach und unkompliziert. Mein Problem: ich bekomme einen Error und weiß nicht wie ich den beheben kann.

TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    procedure Button1Click(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;

var
  Form1: TForm1;
  Sprit, Entfernung, Verbrauch : real;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label4.Caption:= FloatToStr (Verbrauch);
  Verbrauch = StrToFloat (Edit1.Text) / StrToFloat (Edit2.Text);

end;

end.
                                                    

Den Error bekomme ich bei Verbrauch = StrToFloat (Edit1.Text) / StrToFloat (Edit2.Text);

Danke schonmal.