[:S.p.a.m.]

С Real все работает норм:

Код:

var a:string;
    x:real;
begin
  a:='1,3';
  x:=StrToFloat(a);
  showmessage(floattostr(x));