Связать нажатие и отжатие клавиши клавиатуры и кнопки на форме

@Timex · Регистрация: 21.01.2016

Author24 — интернет-сервис помощи студентам

Приветствую!
Простейшая с виду задача.
Нужно сделать так, чтобы при нажатии на клавишу М, происходило визуальное нажатие кнопки на форме, (ну и выполнялось то же действие, что и при _нажатии_ кнопкой мыши на эти кнопку.
То же и для отжатия клавишу М - аналогично отжимаем на форме и что-то делаем...
(пока что действия разные - для отладки, но потом вставлю вызов функции...)

Вопрос - как лучше сделать? Сейчас всё работает кроме визуального нажатия Button1 при нажатии клавиши.

C++

bool keypress; //флаг для исключения повтора вызова при удержании клавиши
 
void __fastcall TForm1::Button1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
         Form1->Memo1->Lines->Add("mouse DOWN");
}
 
void __fastcall TForm1::Button1MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
Memo1->Lines->Add("mouse UP");
}
 
void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if (Key == 'M' && !keypress) {Memo1->Lines->Add("key M down");
 keypress = true;
 }
}
 
void __fastcall TForm1::FormKeyUp(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if (Key == 'M') {Memo1->Lines->Add("key M up");
 keypress = false;
 }
}

@Timex · 28.02.2016, 04:49 **[ТС]**

Если такой способ оптимальный, как сэмулировать нажатие и отжатие кнопки на форме?

Добавлено через 16 минут
разобрался.
в обработчиках нажатия клавиш пишем

C++

1	SendMessage (Form1->Button1->Handle, WM_LBUTTONDOWN, 0, 0);

C++

1	SendMessage (Form1->Button1->Handle, WM_LBUTTONUP, 0, 0);

	28.02.2016, 04:49