Fórum Renomer em orden numérica #356103

Ola pessoa estou presizando de um ajudina qui. Preciso criar em um bloco de nota um sequencia na sequinte ordem

1JPG JPGFILE 1.JPG
2JPG JPGFILE 2.JPG
3JPG JPGFILE 3.JPG
4JPG JPGFILE 4.JPG
5JPG JPGFILE 5.JPG
6JPG JPGFILE 6.JPG
7JPG JPGFILE 7.JPG
8JPG JPGFILE 8.JPG
9JPG JPGFILE 9.JPG

Até 1010

se alguem poder me ajudar como eu crio um função no delphi 7 para gerar um aquivo de texto com está ordem

e tambem se for possivél como renomear 1010 arquivos jpg na seguinte ordem
1
3
4
5
6
7

até 1010