Форум: "Основная";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];
Внизгорячие клавиши Найти похожие ветки
← →
MegaVoltik (2002-12-10 17:54) [0]как сделать чтоб по нажатию <Enter> на модальной форме нажималась кнопка ОК, а по нажатию <ESC> кнопка Cancel?
вот этот код не работает;(
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_Escape: btnCancel.Click;
VK_Return: btnOK.Click;
end;
end;
← →
Skier (2002-12-10 17:57) [1]>MegaVoltik
> как сделать чтоб по нажатию <Enter> на модальной форме нажималась
> кнопка ОК
Самый простой вариант поставить у btnOK.Default := True
← →
Skier (2002-12-10 18:00) [2]>MegaVoltik
А вариант с VK_Escape должен работать...
Попробуй поставить у формы KeyPreview := True
← →
FreeLancer (2002-12-10 18:15) [3]для TButton и TBitBtn:
btnCancel.Cancel := true;
btnOK.Default := true;
← →
Юрий Зотов (2002-12-10 18:17) [4]> Самый простой вариант поставить у btnOK.Default := True
... а у кнопки btnCancel поставить Cancel = True.
И больше ничего не требуется. Никаких KeyPreview и никаких обработчиков.
← →
Skier (2002-12-10 18:19) [5]>FreeLancer
Да точно ! Св-во Cancel вылетело из головы...:)
>MegaVoltik
см. FreeLancer © (10.12.02 18:15)
← →
MegaVoltik (2002-12-10 19:48) [6]но вот проблема когда на форме есть другой элемент управления, который имеет фокус ввода, то после завершения редактирования нажатием клавиши <Enter>, нажимается кнопка ОК, и закрывается форма, а если мне нужно продолжать редактировать другой элемент? как быть? снова открывать модальное окно??
← →
Юрий Зотов (2002-12-10 19:56) [7]Вы какой вопрос задавали?
> как сделать чтоб по нажатию <Enter> на модальной форме
> нажималась кнопка ОК, а по нажатию <ESC> кнопка Cancel?
И как же он увязывается с Вашим постингом (10.12.02 19:48)?
Никак. Так что Вы уж определитесь, что же Вам все-таки нужно - ехать или шашечки?
← →
MegaVoltik (2002-12-10 20:43) [8]тогда всем большое спасиба, особенно Юре Зотову
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.23;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c