Ver Mensaje Individual
  #12  
Antiguo 28-01-2004
Avatar de marto
marto marto is offline
Miembro
 
Registrado: may 2003
Ubicación: Barcelona, Catalunya
Posts: 882
Reputación: 22
marto Va por buen camino
Cita:
Empezado por roman
pero no es StrToFloat quien usa lo que devuelve FormatFloat sino alrevés: FormatFloat usa lo que devuelve StrToFloat.
¿Estás seguro de eso?

Código:
procedure TForm1.Button1Click(Sender: TObject);
var
  numero : real;
  st : string;
begin
  st:= ednumero.Text;
  st:= FormatFloat('#,##.00',strtofloat(st));
  ShowMessage(st); //aquí muestra el mensaje perfectamente,todo muy bien 
  //Hemos pasado el FomatFloat bien, ya que ednumero.Text estaba sin 
  //adornar pero ahora st ya tiene "adornos"
  numero:= StrToFloat(st);
  //aqui es donde peta, ya que le pasamos a StrToFloat 
  //el resultado de FormatFloat
end;
__________________
E pur si muove
Responder Con Cita