Memo-Feld: Zeile und Buchstabe auslesen

[idefix2]

Trotzdem ist if t[k] = '0' then Area1[i,k] := false else Area1[i,k] := true; ein Unding.

Wie wärs mit area1[i,k] := t[k]<>'0' So Riesen boolean arrays kann man im übrigen meistens besser und effizienter durch ein set implementieren:
also set of [1..120] statt array[1..120] of boolean