Обработка нажания на клавишу 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(ов) не имеющих фокуса то нужно действовать
по первому предложению :)))

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

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