Tema: Decimales
Ver Mensaje Individual
  #1  
Antiguo 26-10-2006
oregon oregon is offline
Miembro
 
Registrado: oct 2006
Posts: 90
Reputación: 18
oregon Va por buen camino
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!
Responder Con Cita