| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Что не так? [Delphi, Windows]
Jazzy$ © (2002-10-18 18:24:00)есть код:
function TForm1.KOLForm1Message(var Msg: TMsg; var Rslt: Integer): Boolean;
begin
result := false;
case msg.message of
WM_KEYDOWN :
case msg.wParam of
VK_F1 : begin
label1.Caption := "VK_F1";
EditBox1.Enabled := true;
EditBox1.Focused := true;
end;
VK_F2 : begin
label1.Caption := "VK_F2";
EditBox1.Enabled := false;
form.Focused := true;
end;
end;
end;
end;
почему VK_F1 срабатывает только один раз? Что
SPeller (2002-10-19 14:13:00) [1]А если после установки фокуса в едит обрабатывать его событие OnMessage ?
Jazzy$ (2002-10-19 09:08:00) [2]2SPeller
form.Focused := true; - не нужно, а вот
EditBox1.Focused := true - нужно, для того, что бы при нажатии на кнопку F1 EditBox1 получал фокус ввода. В этом то и вся проблема, после этого можно нажать на F2 и после этого реакции на F1 нет. Почему?
SPeller (2002-10-19 00:50:00) [3]А если убрать EditBox1.Focused := true; и form.Focused := true;? Зачем они вообще нужны?
Jazzy$ (2002-10-18 19:22:00) [4]Что не так здесь?
После того, как была нажата F2 то реакции на F1 нет, пока фокус не получит любой другой контрол (например button)
| |
