Das letzte Zeichen im Tedit "verschwinden" lassen

[psd-sign]

Folgendendes Szenario:

In einem Formular ist ein TEDIT

In dieses gebe ich z.B. folgendes ein:

'1234567890'

Wenn ich nun auf eine Taste drücke, wird aus dem String:
'123456789'
Wieder Tastendruck:
'12345678'
Wieder Tastendruck:
'1234567'
Wieder Tastendruck:
'123456'

und so weiter ... ich vermute, dass ich mit 'length' und dann mit Copy arbeiten muss. Aber ich bin gerade der King des roten Compilers. Jemand eine Idee? Wobei ich gestehe, dass die Copy Methode mir noch nicht ganz eingeht

[b1zZ]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  edit1.Text:= copy(Edit1.Text,1 , length(Edit1.Text)-1);
end;

würde dann auf ButtonClick den Inhalt des Edit bis auf das letzte Zeichen kopieren.
Die Lösung wär so wie du es vermutet hast.
Hoffe geholfen zu haben.

Kann dir nur empfehlen, eine weitere Instanz von Delphi aufzuhaben wo du die einzelnen kleinen Probleme schnell mit einem Button und evtl. ShowMessages testen kannst. So mache ich das auch bei entwickeln von Funktionen und ähnlichem.

[psd-sign]

Hatte es auch gerade (nach ner Kanne Kaffee) rausbekommen. Trotzdem Danke