Ver Mensaje Individual
  #2  
Antiguo 28-10-2007
fide fide is offline
Miembro
 
Registrado: oct 2006
Posts: 331
Reputación: 18
fide Va por buen camino
Variable de tipo real.

Bueno, con la funcion FloatToStr(ValorReal), pues se retorna como resultado dicho valor conertido a String.

Aqui un Ejemplo:

Código Delphi [-]
function Promedio(Val1, Val2, Val3: Real): Real;
begin
 Result := (Val1 + Val2 + Val3) / 3;
end;

Un ejemplo de uso...

Código Delphi [-]
Edit1.Text := FloatToStr(Promedio(5.123, 7.12, 190.5));

Otra cosa. Para definir la cantidad de cifras decimales usa la funcion Format de la siguiente manera.

Código Delphi [-]
Edit1.Text := Format('%.xf', [Promedio(5.123, 7.12, 190.5)]);
//Donde la x la sustituyes por la cantidad de cifras que desees despues de la coma decimal...

Un Ejemplo de esto es:
Código Delphi [-]
Caption := Format('%.5f', [(12*12*12) / 7.98]);
  {Donde el resultado tiene 5 lugares despues de la coma .Documentate en la ayuda sobre Format, que es muy util.}

Ha, para convertir de String a Real se usa StrToFloat(ValorString);

Espero ser de ayuda para tu problema.. Suerte y saludos.. Dx.xx

Última edición por fide fecha: 28-10-2007 a las 04:55:13.
Responder Con Cita