Pasar de string a float

[joanajj]

Buenas a todos, quisiera hacer esto:

Recibo este valor en string. Por ej. valor='123456789'
y quiero pasarlo a numérico y que quede así: 123456,789

¿Cómo podría hacerlo???


Saludos....

[vic_ia]

Hola...

Código Delphi [-]
function mostrar(valor : string):string;
var
  dato : Double;
begin
  dato  := StrToFloat(valor);
  result := FormatFloat('######,###',dato);
end;

saludos....

[marcoszorrilla]

Otro ejemplo:

Código Delphi [-]
  procedure TForm1.Button1Click(Sender: TObject);
  var
  cCadena:String;
  nNumeroouble;
  begin
  cCadena:='123456789';
  nNumero:=StrToFloat(cCadena) /1000;
  ShowMessage(FormatFloat(',0.000',nNumero)); //Para comprobar el resultado
  end;

Un Saludo.

[joanajj]

Gracias por la rápida respuesta.