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;