Calcular unidades de 6.

[CRIS]

Hola chicos, tengo un problema que no se como solucionar, me explico.

Si tengo un numero 38, necesito mostrar el resultado de dividir 38/6 = 6 en un label y en otro label lo que sobra, osea 2, si no sobrase nada pues daría 0, con lo cual cuando yo pongo en un edit un numero, que automáticamente me de en un label la cantidad dividida entre 6 y el resto en otro label.

Espero haberme explicado bien, muchas gracias.

[duilioisola]

Teniendo Valor como un entero puedes utilizar DIV y MOD.
DIV devuelve una división entera
MOD devuelve el módulo (resto) de una división.


var
Valor : integer;
begin
Valor := 38;
ParteEntera.Text := IntToStr(Valor DIV 6);
Resto.Text := IntToStr(Valor MOD 6);
end;

[CRIS]

Muchas Gracias por la pronta respuesta duilioisola me va de lujo, gracias de nuevo y un saludo.