Клавиша Backspace

← →
BaxTMaH © (2005-09-27 13:50) [0]

Как написать свою клавишу Бэкспейс? Ну чтобы при нажатии на нее удалялся последний символ?

← →
umbra © (2005-09-27 14:04) [1]

> удалялся последний символ

последний символ где?

← →
IceBeerg © (2005-09-27 14:05) [2]

Напрмер:
procedure TForm1.Button1Click(Sender: TObject); var InputStr:String; begin InputStr:="123"; Label1.Caption:=Copy(InputStr,1,Length(InputStr)-1); end;

← →
BaxTMaH © (2005-09-27 14:09) [3]

Ураа, я типа сам сделал, правда не так красиво -) А удалять последний символ в Edit1.Text

← →
Leonid Troyanovsky © (2005-09-27 14:13) [4]

> BaxTMaH © (27.09.05 13:50)
> Как написать свою клавишу Бэкспейс? Ну чтобы при нажатии
> на нее удалялся последний символ?

На своей клавише нацарапать гвоздиком: "<-"
А чтобы она удаляла символы следует засунуть ее в нужное место.

--
Regards, LVT.

Ты что то странное написал, надеюсь это не издевательство...

а разве в эдите бэкспейс не работает?

Вообще-то есть события OnKeyDown и OnKeyUp, специально для подобных целей

Клавиша Backspace Найти похожие ветки