Numero Mayor igual , Menor igual... Problema

[ZiriusB]

Me genera un error de tipos no compatibles

[DCC Error] Evaluacion.pas(684): E2008 Incompatible types

Aposi:

Es "100" ese numero es el resultado de la suma de otros...las otras formas ya las he intentado y nada que resulta, sin embargo si coloco SOLO:

Código Delphi [-]
if (npromedio.Text=100)  then
begin
npromedio.Text:='4'
end

Ahi si me escribe "4"