Delphi 7 - Handling MouseWheel events for Embedded Frames in Forms?
问题 Hi I have a form with several frames inside. For some of the frames, i wish to scroll the contents (or at least handle the mousewheel event). I have tried the following: Simply assigning a OnMouseWheel event handler for each frame Overriding the MouseWheel event for the parent form: procedure TFmReview.MouseWheelHandler(var Message: TMessage); var Control: TControl; begin Control := ControlAtPos(ScreenToClient(SmallPointToPoint(TWMMouseWheel(Message).Pos)), False, True); if Assigned(Control)