Mehrfach vorkommende Programmzeilen vereinfachen

[Avicenna]

Hallo,
folgende Programmzeile kommt in meinem Programm oft vor:

Delphi-Quellcode:

  for i:=0 to 15 do
    for j:=0 to 15 do

Damit der Programmcode nicht so groß wird, würde ich gerne statt diesem Programmcode einfach s; schreiben. Wie kann ich das realisieren? Ich habe versucht, eine Variable s vom Typ string zu erstellen, aber ich konnte dieser dann keinen Startwert zuordnen, da kam immer eine Fehlermeldung.

Viele Grüße,
Avicenna