Zmiana nazw plików

Mam pytania, które być może innym wydaje się banalne, ale:

Załżmy, że w jakimś fol,derze znajdują się pliki
1.jpg, 2. jpg, 6.jpg, 7.jpg oraz x.jpg, y.jpg, z.jpg, a.jpg itp.

Ładuję nazwy plików do listbox i jak zrobić aby program odszukał, że w ciągu nazw plików jest luka i zmianił nazwy plików, które w nazwi nie posiadają cyfr tak aby wypełniły luke i żeby było 1 2 3 4 5 6 7 8 jpg.
A jeśli luka wynosi 5 cyfr, a plikow bez cyfr w nazwie jest wiecej no niec hwyopełni luke a potem zmienia nazwe zwiekszajac kolejne liczby

a kolejnosc numerow ktore bedzie nadawal plikowm "z luki" ma byc dowolna?

Zrób liste plików z folderu...
Zmież wszyskie ich nazwy np. z *.jpg na *.jpg.tmp
Wsadź to do jakiegoś ListBoxa albo TStringList...
Ustaw automatyczne sortowanie.
Później zrób np. tak:

For I:=0 to ListBox1.Items.Count-1 do
RenameFile(ListBox1.Items[i], ExtractFilePath(ListBox1.Items[i])+inttostr(I)+'.jpg');

Nie wiem, czy dobrze napisalem, bo nie mam teraz pod ręką delphi...