decimales

[[escafandra]]

Una cosa me llama la atención:

Empezado por anoniboxx

if(Form4->ADOT->FieldValues["Lunes"]==Form5->Label1->Caption)
{hs=hs+7.3;hs2=hs2+7.33;}.

Si sumas valores diferentes no esperes valores iguales.

Por otro lado, si a un float le sumas el resultado de una operaioón de un int con una cte sin decimales, el resultado sumado es un int, osea no tiene decimales. Esto es importante si estas haciendo divisiones. No es lo mismo estas dos expresiones:

int n = 9;
float f1 = n/2;    // f1 vale 4
float f2 = n/2.0;  // f2 vale 4.5

Mira a ver si tienes expresiones como esas.

Saludos.