Problemas con Format()

[RoyTan]

Saludos.

Después de una larga temporada intentando descubrir el motivo por el cual doy formato a un número Real y sin embargo no logro formatear un entero.

Pues haber si alguna alma caritativa me ayuda, pues sencillamente yo… no soy capaz. Incluso he revisado la ayuda de Delphi, pero para nada, pues yo desafortunadamente de ingles 0 patatero.

Y ni siquiera he encontrado nada que me valga en los foros, y si hay algo, espero me disculpen dada mi gran torpeza no lo he visto.

Ejemplo:

Con este código no tengo problemas, la variable Total es del tipo Real. Y Para que funcione la tengo que convertir antes a String asignándola a la variable STotal de tipo String. Y el resultado del formateo es por ejemplo 1.000.000,00

STotal := FloatToStr(Total);
StaticText1.Caption := Format('%n', [StrToFloat(STotal)]) + ' €';

Y sin embargo con este código sí tengo problemas, la variable Contador es de tipo Integer y SContador de tipo String. Y con este debería ser por ejemplo 1.000.000 pero no, y no se porqué.

SContador := IntToStr(Contador);
StaticText2.Caption := Format('%d', [StrToInt(Contador)]) + ' Registros';


Alguien amable y de buen corazón me lo podría aclarar, si es que me he explicado bien.

Gracias.