Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Mostrar en un edit una variable de tipo real (https://www.clubdelphi.com/foros/showthread.php?t=49720)

Petolansa 28-10-2007 03:52:25

Mostrar en un edit una variable de tipo real
 
Buenas gente deseo mostrar una variable de tipo real en el text de un edit.
Estuve probandon lo siguiente.

Código:

total:strtocurr(edit2.text);
Desde ya muchas gracias

fide 28-10-2007 04:43:47

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

Petolansa 28-10-2007 04:53:58

Gracias
 
Te agradezco por la rapidez y la respuesta

Saludos

fide 28-10-2007 05:05:58

Okas!
 
Aqui todos nos ayudamos cuando es necesario. Cuando yo necesite ayuda tambien estare agradecido si tu me respondes!

Ha, te sirvio todo lo que te dije para resolver tu problema????

Petolansa 31-10-2007 03:56:47

Gracias
 
Si fide me sirvio, obviamente que cuando aprenda ahi estare ayudandote.

Desde ya muchas gracias

No habia leido el ultimo mensaje!


La franja horaria es GMT +2. Ahora son las 15:18:55.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi