Postęp wyciągania pliku z zasobów

Mam problemik mały :P
Mam prosty instalator (ten co w kursie Adama) i chciałbym wyświetlić postęp wyciągania plików z zasobów. W tym moim pasek postępu przyjmuje warość I i jest dodawane 1 w pętli do 100. Wiem, że można jakoś to zrobić, zeby pojawiał się rzeczywisty postęp. Proszę o Pomoc !!!! [glowa]

ProgressBar.Max := liczba_plikow_do_wyciagniecia;
ProgressBar.StepBy(1);
for i:=1 to liczba_plikow_do_wyciagniecia do begin
  Wyciagaj_plik(Pliki[i]);
  ProgressBar.StepIt();
end;