Проблема с переводом типов данных

[Саня_]

var
a,b:string;
a1,b1,c1:real;

procedure TForm1.Button14Click(Sender: TObject);
begin
b:=Edit1.Text;
a1:=strtoint(a);
b1:=strtoint(b);
c1:=(a1-b1);
Edit1.Text:=inttostr(c1);
end;

пишет "there is no overloaded version of 'inttostr' that can be called with these arguments". Помогите, пожалуйста.

[chertovich]

IntToStr приводит тип Integer к string, а тебе нужно тип Float к string, то есть FloatToStr

[Саня_]

большое спасибо, работает