Текущий архив: 2005.10.16;
Скачать: CL | DM;

Вниз

Клавиша 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.

---

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

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

---

← →
umbra ©   (2005-09-27 14:31) [6]

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

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

---

Страницы: 1 вся ветка

Текущий архив: 2005.10.16;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.056 c