Форум: "Основная";
Текущий архив: 2003.05.26;
Скачать: [xml.tar.bz2];
Вниз
Обработка нажания на клавишу 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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c