paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 09:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: Publish OnMouseWheelHorz/Left/Right events for most controls. Issue #34683, patch from AlexeyT.

Browse Source 
git-svn-id: trunk@59801 -
This commit is contained in:
juha 2018-12-12 11:33:10 +00:00
parent 27b90f60de
commit 5c4bd12dd3
10 changed files with 66 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/calendar.pp
View File

@ -143,6 +143,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnUTF8KeyPress; property OnUTF8KeyPress;
property OnYearChanged; property OnYearChanged;

3
lcl/checklst.pas
View File

@ -125,6 +125,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnSelectionChange; property OnSelectionChange;
property OnShowHint; property OnShowHint;

3
lcl/colorbox.pas
View File

@ -256,6 +256,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnSelectionChange; property OnSelectionChange;
property OnShowHint; property OnShowHint;

12
lcl/comctrls.pp
View File

@ -1741,6 +1741,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnSelectItem; property OnSelectItem;
property OnShowHint; property OnShowHint;
@ -2769,6 +2772,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnKeyDown; property OnKeyDown;
property OnKeyPress; property OnKeyPress;
property OnKeyUp; property OnKeyUp;
@ -3772,6 +3778,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnNodeChanged; property OnNodeChanged;
property OnResize; property OnResize;
property OnSelectionChanged; property OnSelectionChanged;
@ -4029,6 +4038,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnSectionClick; property OnSectionClick;
property OnSectionResize; property OnSectionResize;

12
lcl/extctrls.pp
View File

@ -428,6 +428,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPaint; property OnPaint;
property ParentColor; property ParentColor;
property ParentDoubleBuffered; property ParentDoubleBuffered;
@ -484,6 +487,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPaint; property OnPaint;
property OnResize; property OnResize;
// property OnStartDock; // property OnStartDock;
@ -593,6 +599,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPaint; property OnPaint;
property OnPictureChanged; property OnPictureChanged;
property OnPaintBackground; property OnPaintBackground;
@ -1150,6 +1159,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPaint; property OnPaint;
property OnResize; property OnResize;
property OnStartDock; property OnStartDock;

6
lcl/grids.pas
View File

@ -1615,6 +1615,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPickListSelect; property OnPickListSelect;
property OnPrepareCanvas; property OnPrepareCanvas;
property OnSelectEditor; property OnSelectEditor;
@ -1849,6 +1852,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPickListSelect; property OnPickListSelect;
property OnPrepareCanvas; property OnPrepareCanvas;
property OnResize; property OnResize;

6
lcl/shellctrls.pas
View File

@ -174,6 +174,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnSelectionChanged; property OnSelectionChanged;
property OnShowHint; property OnShowHint;
property OnUTF8KeyPress; property OnUTF8KeyPress;
@ -302,6 +305,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnSelectItem; property OnSelectItem;
property OnStartDrag; property OnStartDrag;

6
lcl/spin.pp
View File

@ -114,6 +114,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnUTF8KeyPress; property OnUTF8KeyPress;
property ParentColor; property ParentColor;
@ -188,6 +191,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnUTF8KeyPress; property OnUTF8KeyPress;
property ParentColor; property ParentColor;

12
lcl/stdctrls.pp
View File

@ -697,6 +697,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnSelectionChange; property OnSelectionChange;
property OnShowHint; property OnShowHint;
@ -1023,6 +1026,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnStartDrag; property OnStartDrag;
property OnUTF8KeyPress; property OnUTF8KeyPress;
property ParentBidiMode; property ParentBidiMode;
@ -1113,6 +1119,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnStartDrag; property OnStartDrag;
property ParentBidiMode; property ParentBidiMode;
@ -1618,6 +1627,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnResize; property OnResize;
property OnStartDrag; property OnStartDrag;
property OptimalFill; property OptimalFill;

3
lcl/valedit.pas
View File

@ -275,6 +275,9 @@ type
property OnMouseWheel; property OnMouseWheel;
property OnMouseWheelDown; property OnMouseWheelDown;
property OnMouseWheelUp; property OnMouseWheelUp;
property OnMouseWheelHorz;
property OnMouseWheelLeft;
property OnMouseWheelRight;
property OnPickListSelect; property OnPickListSelect;
property OnPrepareCanvas; property OnPrepareCanvas;
property OnResize; property OnResize;