letzte buchstabe von editbox löschen

[heyo]

:?: :?: ich möchte eigentlich nur die letzte buchstabe von dem Text des dbeditbox1 löschen
wenn jemand eine idee hat, warte ich auf ihrer hilfe. :?: :?:
danke...

[Matze]

Delphi-Quellcode:

var s: string;
...
s := Edit1.Text;
  
Delete(s, Legnth(s), 1);

Edit1.Text := s;

Müsste so in der Art gehen, ist aber nicht getestet.

[-homer-]

hi,

ich würde es mit

Delphi-Quellcode:

a := Edit1.text.count;
a := a - 1;
Edit1.text.count := IntToStr(a)

Wobei 'a' eine Integer Variable ist.


-homer-

ps.: Schön das du zu uns gekommen bist :mrgreen:

[kiar]

hallo und willkommen in der Dp

Delphi-Quellcode:

var 
  x :integer;
begin
  x:=length(dbedit1.text) // ermitteln der länge des strings
  delete(s,x-1,1);
end

[heyo]

ich danke euch alle drei
eigentlich ich bin immer noch nicht klar gekommen aber
mindestes habe ich verstanden, wie ich es machen soll... danke nochmal