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

Вниз

Как сделать чтоб Edit не пикал..   Найти похожие ветки 

 
Anonimus   (2003-04-28 13:14) [0]

Здрасти!!
У меня вот какой вопрос..
В эдите обрабатываю нажатие клавиши Enter, и он пикает.
Как сделать так чтоб он не пикал..????


 
Skier ©   (2003-04-28 13:29) [1]

1)OnKeyDown - Key := 0;
2)OnKeyPress - Key := #0;


 
Anonimus   (2003-04-28 13:38) [2]

не помогает..


 
Skier ©   (2003-04-28 13:40) [3]

>Anonimus
Код !


 
Anonimus   (2003-04-28 13:45) [4]

procedure TForm1.Edit2KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_Return then
begin
//Login;
Key := 0;
end;
end;


 
Skier ©   (2003-04-28 13:59) [5]

>Anonimus (28.04.03 13:45)

procedure TForm1.Edit2KeyDown(Sender: TObject; var Key: Char);
begin

if Key = #13 then
begin
//Login;
Key := #0;
end;

end;

1) - отменяется.



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
1-34418
Bug008
2003-04-23 19:30
2003.05.12
Выделение цветом слова в Edit


4-34657
Syon
2003-03-06 22:41
2003.05.12
Как вернуть фокус своей форме ( но! из-под Кваки!!! )


1-34506
[diesel]
2003-04-30 07:52
2003.05.12
Прорисовка TListView


1-34509
yaric
2003-04-30 00:59
2003.05.12
Как при выполнении проги можно прочитать данные из Version Info


11-34382
Alexander
2002-07-23 14:45
2003.05.12
Кто нибудь покажет примерный исходничек, как в KOL сделать COM