[ViNT]

Real в String преобразуется элементарно:

var
 S:String;
 R:Real;
begin
 S:=''+R;
end; 


как ни странно, ошибки не будет.