La Web del Programador: Comunidad de Programadores
 
    Pregunta:  33500 - DE REAL A INTEGER
Autor:  jose ferreiro
Alguien me podria decir como pasar un numero de un tipo real a otro integer.
por ejemplo de 224.68 quiero tener 224.
Gracias

  Respuesta:  Luis Felipe García Gutiérrez
lo que se puede hacer es lo siguiente:

primero se debe definir la variable que lleva el número decimal de tipo variant, luego el siguiente código...

var
entero:variant;
begin
entero:=numero,decimal;
entero:=(entero div 1));
end;

con ésto en entero queda guardado el valor sin decimales requerido...

espero haber ayudado con algo.

Suerte!!!

  Respuesta:  Santiago Estupiñan
var
r:real;
f,RE:integer;
begin
val(edit1.text,r,f);
RE:=trunc(r);
edit2.text:=inttostr(RE);
end;

Prueba con este codigo y que te sirva de ayuda saludos.

  Respuesta:  antonio perez
Hay una funcion que realiza esto.
var integer:=ROUND(dato real);

  Respuesta:  german nicolas acosta
para quitar la parte decimal de un numero real solo usa la funcion TRUNC para que quede unicamente la parte entera y quite la parte decimal de el numero.