Illegal expression in Else line

When I try to compilate my code a "unit1.pas(53,1) Error: Illegal expression"

in else line appears.

procedure TForm1.Button1Click(Sender: TObject); var x: real; begin x:=StrToFloat(Edit1.Text); if x>=0 then Label1.Caption= FloatToStr(x) else Label1.Caption:= Floattostr(x);