tmonkey子控件不接受键盘/鼠标输入- (Delphi XE7 firee7)

I'm attempting to style a TPopup with several subcontrols, and then assign event handlers to those controls that need them (buttons primarily). I am using TPopup.IsOpen:=True. When using TPopup.popup(True), input is detected and all mouse events work great, but I do not want the user to do anything more than "click" away from the popup window to close it.I'm attempting to style a TPopup with several s