Numero Mayor igual , Menor igual... Problema

[ZiriusB]

Buenos dias, tengo un problema estoy realizando una aplicacion en donde arrojo un numero como resultado, y realizo una operacion para darle a ese numero un valor depende de lo que de el resultado...

Es decir si el resultado va de 1 a 50, entonces en NPROMEDIO voy a obtener un "2", si va de 50 a 70 en N PROMEDIO obtendre un "3"... asi tengo hasta el momento la sentencia:

Código Delphi [-]
if (npromedio.Text>='0') and (npromedio.Text<='34,99') then
begin
npromedio.Text:='0'
end

    else

if (npromedio.Text>='35') and (npromedio.Text<='45,99') then
begin
npromedio.Text:='1'
end

    else

if (npromedio.Text>='46') and (npromedio.Text<='74,99') then
begin
npromedio.Text:='2'
end

    else

if (npromedio.Text>='75') and (npromedio.Text<='95,99') then
begin
npromedio.Text:='3'
end

    else

if (npromedio.Text>='96') and (npromedio.Text<='100') then
begin
npromedio.Text:='4';
end;

El problema es que cuando el resultado es 100 me coloca en NPROMEDIO "0" aun cuando le digo que sera "4", intente con otro TEDIT y me da el mismo resultado...tengo solo problemas cuando es 100...cuando va de 1 a 99 todo esta bien!

Si podrian guiarme se los agradeceria

Un millon de gracias!