StringGrid horizontal, vertikal und diagonal füllen

[Eagelone]

Hallo,

ich möchte ein Stringgrid gern mit Buchstaben füllen und zwar horizontal, vertikal udn diagonal.

Ich habe ein Edit-Fenster wo ein Wort drin steht. Dieses Wort wird bei mir in die einzelnen Buchstaben aufgeteilt und jeweils ein Buchstabe soll in eine Zelle.

Horizontal geht dies ja mit:

Delphi-Quellcode:

            for i := 1 to length(s) do begin
               StrinGrid1.Cols[i-1].Add(s[i]);

Aber wie geht das vertikal und diagonal und alles rückwärts?
Man kann ja das irgendwie mit einem "case of" laufen lassen, oder?

Außerdem soll die Anfangsstelle jeweils über einen Zufall laufen!

Ich würde mich über Tipps für mein Problem freuen! DANKE!

Grüße,
Eagelone