You can program the following methods:
var CurrentForm: TForm; // Make sure to make it a global variable procedure KeyDownEvents(var Key: Word; Shift: TShiftState); begin CurrentForm:=Screen.ActiveForm.Name; if Key = VK_F9 then CurrentForm.KeyBoard1.Show; end;
This will fix the problem. Similarly, you can process the form with a mouse click and another keystroke. Hope this helps.
user7493939
source share