![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
OnClick [D6, Win95/98]
Наташа © (2003-02-11 12:17:00)Мастера Delphi! подскажите пожалуйста. Существует некая процедура, Когда она вызывается из обработчика OnClick какой-либо кнопки, все работает хорошо, но Если Вызвать из Onclick какой-либо клавиши клавиатуры, то не работает.
If Key=#13 then
{некая процедура}
Key=#0
В чем дело?
Sheriff (2003-02-11 13:26:00) [1]либо KeyPreview у формы установить в true...
han_malign (2003-02-11 13:21:00) [2]Вероятно, в том и проблема, что VK_RETURN - перехватывается контролом до OnKeyPressed и соответственно (Key=#13) никогда не приходит. (Хотя это надо проверить - не уверен).
myor (2003-02-11 12:51:00) [3]если не ошибаюсь,
If Key=#13 then... в OnkeyPressed().
gek (2003-02-11 12:27:00) [4]keypreview=true
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=VK_RETURN then
superbuttononclick(self)
end;
mate (2003-02-11 12:23:00) [5]Чё-то вопрос не понятен. Процедуру onKeyPress пробовали использовать?
D (2003-02-11 12:23:00) [6]
Проверь в режиме пошаг.отладки. Может, вообще сюда
If Key=#13 then
{некая процедура}
(в OnKeyDown или OnkeyPressed) не заходит