Hola.
No es recomendable cambiar el código de las unidades del propio delphi. De hecho, según recuerdo, la licencia lo prohibe.
Por otro lado, en delphi 7 tenes la unidad DateUtils, con la que podes hacer:
MonthOf(now);
que dará el resultado que buscas.
Si de todas formas decidis hacer tu función, o si te sirve en otra ocasión, es mejor que hagas tu propia unidad o unidades, que luego simplemente añadis al uses para que esté disponible donde querras.
Hasta luego.
