aus char in bestimmen index eines string kopieren

[dj-f]

tach,

ich hab bis montag früh ein problem zu lösen:

ich will aus einem array of char ein durch variable indizes bestimmtes zeichen in ein string an eine bestimmte stelle einfügen und der compiler spricht immer eine warnung aus. er combiliert es zwar, aber wenn die entsprechende procedur dran ist streikt er. genauer geht es um polyalphabetische verschlüsselung mit wechselnden matrizen.

Delphi-Quellcode:

type TMatrix= array[1..10,1..26,1..26]of char;

var f, k,  n,i,j:integer;  //n ist die nummer der verwendeten Marix und vorher deffiniert.
    txt1,txt2, pass:string;  //txt1 ist original, txt2 verschüsselt
    X:TMatrix;  //wird voher mit kleinen buchstaben gefüllt wie 10 sudokus.(so, dass in einer spalte kein buchstabe doppelt vonkommt usw.)


... begin
      if (ord(txt1[f])>96) and (ord(txt1[f])<123)then
      begin
        i:=0;
        j:=0;
        repeat j:=j+1 until
         X[n,j,1]=txt1[f];
        repeat i:=i+1 until
         X[n,1,i]=pass[k];
        txt2[f]:=X[n,j,i];  //geht nicht
      end
      else
        txt2[f]:=txt1[f]; //geht auch nicht!!
     end...

thx schonmal im voraus...