PDA

Ver la Versión Completa : Float o Integer


Caral
23-11-2006, 17:44:18
Hola a todos
Primero saludarlos
Tengo una duda, tal vez tenga alguna solucion.
Tengo 3 edit., todos numericos.
La operacion que necesito hacer es una division normal, pero que si el resultado de esta es con decimales sea = 0 o nada el edit en blanco.
Ejemplo:
Tengo un numero ( edit1 = 3 )
Si la divido entre 2, osea pongo ( edit2 = 2 ), me da ( Edit3 = 1.5 ), osea con decimales, lo que necesito es que me de 0, ( Edit3 = 0 ).
Numero Edit1 = 3
Divisor Edit2 = 2
Resultado Edit3 = 0
o mejor Edit3 = ' ', osea nada.
Se podra ?
De antemano muchas gracias
Saludos

Neftali [Germán.Estévez]
23-11-2006, 18:05:01
¿Te refieres a esto?
Lo puedes poner después de dividir. Lo que hace es que si el resultado no es exacto, lo convierte a ''.


if (StrToFloat(Edit3.Text) <> Trunc(StrToFloat(Edit3.Text))) then begin
Edit3.Text := '';
end;

roman
23-11-2006, 18:21:34
Me parece que también podría usarse el operador div:


Resultado := StrToInt(Edit1.Text) div StrToInt(Edit2.Text);


// Saludos

Neftali [Germán.Estévez]
23-11-2006, 18:46:01
Me parece que también podría usarse el operador div

Pero eso no da el resultado deseado.

...osea con decimales, lo que necesito es que me de 0, ... o mejor Edit3 = ' '

roman
23-11-2006, 18:58:01
Tienes toda la razón, leí mal y estaba pensando en que Trunc(a/b) viene a ser lo mismo que a div b pero él de plano quiero cortar por lo sano. :)

// Saludos

Caral
23-11-2006, 19:12:57
Hola
Gracias por las respuestas lo voy a intentar y comento si tengo alguna duda, esto lo estoy haciendo por la operacion que necesito desarrollar para buscar el minimo y maximo comun, ya me lleba un rato esto, pero va.
Saludos

Caral
23-11-2006, 20:05:18
Hola
Ya esta probado, Perfecto, Gracias
Saludos

vtdeleon
23-11-2006, 20:37:03
Y que tal mod??

Resultado := StrToInt(Edit1.Text) mod StrToInt(Edit2.Text);
if resultado >0 then
edit3.clear;

Saludos

Robert01
24-11-2006, 02:22:21
Hola
Ya esta probado, Perfecto, Gracias
Saludos

Caral: ¿porque no usás el código que te envié para calcular el MCM?

saludos

Neftali [Germán.Estévez]
24-11-2006, 10:23:31
Caral: ¿porque no usás el código que te envié para calcular el MCM?

Creo qu esto hay que ponerlo en el hilo donde toca Robert, no aquí.
Un saludo.