Geschachtelte Schleife /Zeile;Spalte

[Muddy]

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
var spalte, zeile, i, j: real;
    zahl: char;
begin
memo1.Clear;
spalte := strtoint (labelededit2.Text);
zeile  := strtoint (labelededit3.Text);
zahl   := strtoint (labelededit1.Text);
i      := 0 ;
  repeat
  i := i + 1;

  for j := 0 to zeile do

  until i := zeile ;
end;

So Leute Ich muss für die Schule in ein Memofeld ein/e Zahl/Buchstaben in beliebiger Anzahl von Spalten und Zeilen ausgeben. Dass soll ich jetzt mithilfe einer geschachtelten Schleife durchführen!! Wie bekomme ich das hin? Ich habe euch mal meinen Programmansatz gegeben.