Wczytywanie liczb z pliku .txt

Witam.
Plik .txt wygląda mniej więcej tak:

454546515457117894222

Każda z tych liczb miałaby być wczytana osobno do tablicy. Jak to zrobić? Wiem jak wczytywać wierszami, ale w tym wypadku to nie wiem. Mam tak:

assign(p, 'c:\liczby.txt');
reset(p);
x:= 0;
while not eof(p) do
    begin
    i:= i+1;
    readln(p, tablica[i]);
    end;

Proszę o pomoc. Pozdrawiam

Plik .txt wygląda mniej więcej tak:

454546515457117894222
Każda z tych liczb miałaby być wczytana osobno do tablicy

Wybacz, ale to jest jedna liczba, składająca się z wielu cyfr;

Skoro wiesz jak wczytać cały wiersz procedurą ReadLn, to powinieneś także wiedzieć która procedura służy do pobrania jednego znaku - tutaj z pomocą przychodzi procedura Read, którą to musisz wykorzystać by znak po znaku uzupełnić macierz;

Edit: Czy zmienna licznikowa i została wcześniej zainicjowana..? Bo jeśli nie, to (powinieneś otrzymać ostrzeżenie) program będzie działał błędnie.

Ja dodam tylko, że jeżeli ta tablica ma przechowywać konkretny typ inny niż string, a przede wszystkim na przykład liczbowy. To należało by przed dodaniem zrobić konwersję procedurą Val ze stringa. Przy okazji sprawdzając w ten sposób czy dany znak/tekst jest prawidłową wartością całkowitą.