Einfacher Verschlüsselungs-Algorythmus // Fehler

[sx2008]

Du hast hier einen hinterhältigen Fehler im Code:

Delphi-Quellcode:

procedure TForm1.EditEingabeChange(Sender: TObject);
begin
  Form1.EditVerwZeichen.Text:=IntToStr(Length(Form1.EditEingabe.Text));  //Anzeige der verwendeten Zeichen
end;

Du greifst auf die globale Variable Form1 zu, obwohl überhaupt nicht gesagt ist, dass "self" und "Form1" identisch sind.
Abhilfe: einfach nicht Form1 hinschreiben

Delphi-Quellcode:

procedure TForm1.EditEingabeChange(Sender: TObject);
begin
  EditVerwZeichen.Text:=IntToStr(Length(EditEingabe.Text));  //Anzeige der verwendeten Zeichen
end;