Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.30;
Скачать: CL | DM;

Вниз

Что не так?   Найти похожие ветки 

 
Jazzy$ ©   (2002-10-18 18:24) [0]

есть код:

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 срабатывает только один раз? Что


 
Jazzy$ ©   (2002-10-18 19:22) [1]

Что не так здесь?
После того, как была нажата F2 то реакции на F1 нет, пока фокус не получит любой другой контрол (например button)


 
SPeller ©   (2002-10-19 00:50) [2]

А если убрать EditBox1.Focused := true; и form.Focused := true;? Зачем они вообще нужны?


 
Jazzy$ ©   (2002-10-19 09:08) [3]

2SPeller
form.Focused := true; - не нужно, а вот
EditBox1.Focused := true - нужно, для того, что бы при нажатии на кнопку F1 EditBox1 получал фокус ввода. В этом то и вся проблема, после этого можно нажать на F2 и после этого реакции на F1 нет. Почему?


 
SPeller ©   (2002-10-19 14:13) [4]

А если после установки фокуса в едит обрабатывать его событие OnMessage ?



Страницы: 1 вся ветка

Текущий архив: 2003.06.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
4-97938
Anet
2003-04-28 10:31
2003.06.30
Получение списка параметров динамически загружаемой функции


3-97492
pathfinder
2003-06-05 01:42
2003.06.30
Вопрос о подключении к БД...


3-97524
alienka
2003-06-06 10:55
2003.06.30
dbGridEh отображение в ячейке...


3-97539
niko4543
2003-06-06 15:30
2003.06.30
BLOB


11-97571
Святослав
2002-10-24 12:44
2003.06.30
Подключение OLE-сервера к программе на KOL