Schleife durch TTimer verlangsamen

[The_Doomed]

hi ich programmiere grad ein programm mit dem man einen Text durch transposition verschlüsselt
dazu soll ein text in eine Stringgrid eingetragen werden.

dies geschieht durch eine doppelte Schleife (Reihe, Spalte)

Das programm hat das ziel das verfahren zu veranschaulichen da aber der rechner die schleife enorm schnell ausließt
kann man die eintrageverfahren nicht beobachten
ich will die schleife jetzt durch einen timer verlangsamen

mein ansatz

Delphi-Quellcode:

for i := 0 to 4 do
  for j := 0 to 4 do
    begin
     table.Font.Size:=18;
     table.Cells[j,i]:=y[k];
    
//pause

      table.Cells[j,i]:='';
     table.Font.Size:=12;
     table.Cells[j,i]:=y[k];
     k:=k+1;

//pause 

    end;

danke im vorraus