Dobry den.
Je vlákno, které frčí furt dokola.
Potřebují ho s Form resetovat.
Prostě když kliknu ve form třeba na button, aby ve vlaknu proměnná radek byla zas 1 a smyčka začala zase od 1.

repeat
for radek := 1 to Form1.StringGrid1.RowCount do
begin

End;
until (Terminated = True);