Usuwanie tekstu z pola Edit

Witam. To moje początki z Delphi 7. Chciałbym zrobić przycisk tzw. Backspace do usuwania tekstu z pola Edit. Czy mógłby mi ktoś napisać jak to zrobić?

Takie tematy to w dziale Newbie pisz.

Dziękuję, będę pamiętał na przyszłość

Chodzi Ci o zwykły przycisk TButton, którego akcją jest czyśczenie TEdit? Wstawiasz Button'a i w OnClick dajesz:

Edit1.Text := '';

Edit.Text := '';
Edit.Clear;

Źle sprecyzowałem, chodziło mi o pojedyncze kasowanie znaków :) Tak jak przycisk Backspace z klawiatury komputera.

a który znak byś chciał usnąć?

BTW zgadując Twoje następne pytania zapoznaj się z
funkcja Delete, Copy
i właściwości Edit SelStart i SelLength

Ostatni znak, np mamy abcd to po przyciśnieciu przycisku jeden raz usuwałby ostatni znak, czyli zostawałoby abc i kolejny raz po przyciśnięciu zostawałoby ab itd.

var s : string;
...
s := edit1.text;
if (length(s) > 1) then
setlength(s, length(s)-1);
edit1.text := s;

albo prosciej z uczyciem substring, jesli cos takiego jest w Delphi.