Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.031 c
3-1125486181
intaari
2005-08-31 15:03
2005.10.16
данные в DBGrid как в cross-tab отчета


14-1126609315
INeedYourHelp
2005-09-13 15:01
2005.10.16
Лицензионная Delphi 7 studio enterprise


1-1127383787
злобная танька
2005-09-22 14:09
2005.10.16
TClass


2-1126637415
_zx
2005-09-13 22:50
2005.10.16
и ещё один простой вопрос


14-1127601152
Леха
2005-09-25 02:32
2005.10.16
VCL