[aposi]

cuando en npromedio.text es 100, o es 100,00 ?? En formato texto, como es ti caso, 100,00 es mayor que 100

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

otra solucion seria:

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