Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Decimales (https://www.clubdelphi.com/foros/showthread.php?t=36846)

oregon 26-10-2006 14:16:07

Decimales
 
Saludos,

Tras revisar el foro, no consigo aclararme sobre como trabajar con decimales.

Necesito hacer varios cálculos sencillos, multiplicaciones y divisiones, y que el resultado aparezca con 2 decimales en el caption de un label

Trabajo con Turbo Delphi 2006 y he intentado declarar una variable como float, numeric o currency, pero no me las reconoce. La única opción es declararla double, pero luego no me deja hacer algo tan sencillo como "div".

Entre otras cosas, lo que necesito es calcular la relación entre ancho y alto de un componente de mi form, y luego mostrar el resultado en un label.
Para ello he hecho:

var
x: integer;
y: integer;
z:float;
begin
x:=panel1.width;
y:=panel1.heigth;
z:=(x div y)*100;
label1.caption:=floattostr(z)+' '+'%';
end;

el problema es que no me reconoce el float como una variable en z:float;
Lo de hacer que tenga dos decimales antes de mostrarlo en el label con formatfloat ni me lo he planteado antes de resolver este problema. Y es que la ayuda de delphi no me "ayuda" valga la redundancia.

¿alguien me puede orientar sobre como trabajar con decimales?

Muchas gracias!

Lepe 26-10-2006 15:53:08

div es división entera, por tanto, el resultado es un Integer.

Si deseas ver números decimales, usa la barra "/" para dividir.

Saludos


La franja horaria es GMT +2. Ahora son las 19:38:44.

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