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

Вниз

Обработка нажания на клавишу Enter   Найти похожие ветки 

 
Space   (2003-05-13 10:05) [0]

Подскажите, люди добрые, как сделать так, чтобы по нажатию на клавишу Enter в обычном Edit`e выполнялось то или иное действие.


 
LexusR ©   (2003-05-13 10:11) [1]

в свойствах формы поставьте KeyPreview = true
и определите обработчик события формы OnKeyDown

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_RETURN then
begin
Edit1.Text := "Нажата клавиша Return";
end;
end;


 
dtrn   (2003-05-13 10:36) [2]

в свойствах формы поставьте KeyPreview = false
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_RETURN then
ShowMessage("Нажата клавиша Return");
end;


 
LexusR ©   (2003-05-13 11:34) [3]

разница двух предложений в том
при каком условии нужно отлавливать ENTER
если после ввода в конкретный Edit то естественно
нужно как предложил dtrn
а если по Enter-у нужно обрабатывать какие-либо действия
для Edita(ов) не имеющих фокуса то нужно действовать
по первому предложению :)))


 
ghg ©   (2003-05-13 14:16) [4]

так может просто обработать OnEnter в Edit"е
точнее сформулировать надо



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

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

Наверх




Память: 0.47 MB
Время: 0.042 c
4-83830
magister
2003-03-25 17:44
2003.05.26
Как рисовать поверх рабочего стола? (типа экранное меню)


11-83432
Gandalf
2002-08-19 10:34
2003.05.26
Result:=(KOL) or (KOL and MCK);


1-83575
Oleg Fox
2003-05-14 12:22
2003.05.26
Изменение свойств компонента TEdit


14-83655
Rocker
2003-05-07 07:23
2003.05.26
Работа с ZIP


3-83400
Солер
2003-05-06 16:59
2003.05.26
Как отменить запрос?