Als erstes würde ich darauf achten, dass wirklich nur die Textlänge genommen wird (könnte ja auch kürzer sein). Dazu kannst du Length() verwenden.
Dein Problem hier ist, dass die einzelnen Zeichen vom Typ Char sind. Auch ein Char muss, wie ein String, in Hochkommas gesetzt werden:
Delphi-Quellcode:
for i:=1 to Length(Edit1.Text) do begin
case Edit1.Text[i] of
'A', 'a': t[i] := 1;
...
'Z', 'z': t[i] := 26;
ansonsten würde ich es auch, wie mkinzler vorgeschlagen hat, über den
ASCII-Code machen, aber gleich so (da du ja nicht nach Groß-/Kleinbuchstaben unterscheidest):
t[i] := Ord(UpperCase(Edit.Text[i]) - 48);