was soll das übersetzt heißen?

[Helmi]

Du willst die Schleife abbrechen wenn die Länge der Verschlüsselung erreicht wurde
Die Variable "Spalte" gehört zur for-Schleife
Mit Break kannst du die Schleife verlassen wenn die Bedingung erfüllt ist
Die Repeat-Schleife komplett entfernen

Delphi-Quellcode:

   for spalte:=1 to laenge_der_verschluesselung do
      begin
      farbe:=image1.Canvas.Pixels[spalte,0];
      wert:=tex[spalte];

      rneu:=ord(tex[spalte]);
      gneu:=ord(tex[spalte+1]);
      bneu:=ord(tex[spalte+2]);
      showmessage('Wert rneu '+inttostr(rneu));
      showmessage('Wert gneu '+inttostr(gneu));
      showmessage('Wert bneu '+inttostr(bneu));

      If spalte = laenge_der_verschluesselung then
        break;
      end;