Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Помогите пожалуйста чайнику   Найти похожие ветки 

 
slivka   (2003-11-01 00:43) [0]

Вопрос у меня наверное глупый, но как с этоим справится незнаю.
Вобщем такая проблема:
procedure TForm1.ComboBox2KeyPress(Sender: TObject; var Key: Char);
begin
if (key<"0") or (key>"9") then else exit ;
if (key<"A") or (key>"F") then else exit ;
if (key<"a") or (key>"f") then else exit ;
if (key="backspase") then exit;
begin
key := #0;
showMessage ("Неправильный формат ввода");

end;

Нужно чтобы клавиша "backspase" выполняла свою функцию. Может как нибудь по другому нужно записать?
Что нибудь типа $* или #* ?


 
Adder ©   (2003-11-01 00:56) [1]

if (key=VK_BACK) then exit;
или
if (key=#8) then exit;

ps Правильно оформляй заголовок, ветки с подобными бессодержательными заголовками ("помогите" и т.п.) обычно удаляются



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

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

Наверх




Память: 0.46 MB
Время: 0.024 c
1-41209
slivka
2003-11-01 22:02
2003.11.13
Как открыть ключь реестра при помощи переменной ?


1-41557
lipskiy
2003-10-24 00:15
2003.11.13
Как вызвать стандартный диалог выбора папки?


14-42040
Vlad Oshin
2003-10-16 11:58
2003.11.13
Ищу распозванулку рукописного текста, есть где-то?


4-42237
LOX
2003-09-13 13:24
2003.11.13
список запущенных приложений


7-42213
Shakula
2003-09-04 15:44
2003.11.13
Как определить адрес порта по названию.