Текущий архив: 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.008 c
