Hallo, ich habe da ein Problem mit einem Edit-Feld. Den Quellcode habe ich bis auf 2 Zeilen reduziert. Programm stürtz mit Fehlermeldung "... EStackOverflow ... StackÜberlauf ..." ab.
Es soll sich bei jeder Änderung (programmiert oder eingegeben) der Text ändern:
Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
var s: String;
begin
s := Edit1.Text + ' BlaBla';
Edit1.Text := s;
end;
Eigentlich wollte ich das programmieren (was auch nicht funktionierte):
Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
Edit1.Text := Edit1.Text + ' BlaBla';
end;
Auf dem Formular ist nichts außer dem EditFeld. Code ist im OnChange-Ereignis.
Was ist die Ursache (bitte kein Fachchinesisch, bin Anfänger)?
Wie kann man die Aufgabe erfüllen und den Absturz vermeiden?
PS: Wozu muß ich die Programmiersprache nochmal eingeben - habe ich doch bei der Registrierung ins Profil schonmal eingetragen? Könnte das nicht oben automatisch erscheinen?