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

synedit: less hints

Browse Source 
git-svn-id: trunk@42741 -
This commit is contained in:
mattias 2013-09-11 22:43:09 +00:00
parent 3f2843e09c
commit 19ea269834
1 changed files with 1 additions and 0 deletions

1
components/synedit/synedit.pp
View File

@ -7129,6 +7129,7 @@ begin
MousePos.X := Message.X;
MousePos.Y := Message.Y;
lState:=[];
if DoMouseWheel(lState, Message.WheelDelta, MousePos) then begin
Message.Result := 1; // handled
exit;