Buchstabenmatrix erstellen?!

[phlux]

Hallöchen!
Irgendwie steh ich aufn schlauch Also ich möchte eine Buchstabenmatrix erstellen die so ungefähr aussieht:

Code:

a a a
a a b
a a c

a b a
a b b
a b c

...

usw., dafür habe ich ein Array vom Typen Char mit den Buchstaben a,b,c. Tja und jetzt verließen sie ihn, bzw bin ich schon(!) mit meinem Latein am ende muss wohl am wetter liegen Naja wie kann ich denn jetzt daraus oben gezeigt Matrix bauen??

mfg phlux

[Kroko1999]

Delphi-Quellcode:

type
  TChar3Array = array[0..2,0..2] of Char;

procedure FillArray (var A: TChar3Array; S: String);
var
  I,J,P,L: Word;
begin
  L := Length (S);
  for J := 0 to 2 do
    for I := 0 to 2 do
     if P<=L then 
       begin
         A[I,J] := S[P];
         Inc (P);
       end;
end;

FillArray (A,'aaaaaaabc');

[phlux]

Hallo Kroko!
Danke für den Code, jetzt hab ich das Prinzip verstanden

mfg phlux