ayuda urgente con qreport por favor

[ddd_ddd]

estoy imprimiendo una lista de alumnos, imprimo el campo "nombre" de la tabla "alumnos", pero tambien quiero imprimir un numero ascendente para cada nombre, osea:
1 maria
2 juan
3 pedro
...

como pongo el numero progresivo?

lo intenté poniendo un qrlabel y un contador de tipo integer con este codigo en el afterprint de la qrband tipo detail:

Código Delphi [-]
contador:=contador+1;
QRLABEL1.Caption:=inttostr(contador);

inicializo el contador:=1 en el evento onactivate del formulario que estoy usando.
deberia de funcionar, porque en el preview del qreport si sale bien el numero progresivo, pero cuando lo imprimo en lugar de salir: 1,2,3,4. Sale:5,6,7,8
ayuda por favor