Compilation fix

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2096 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2011-10-26 17:33:03 +00:00
parent d6fafee869
commit af52832281

View File

@ -13321,10 +13321,12 @@ const
var
ScrollCount: Integer;
ScrollLines: Integer;
State: TShiftState;
begin
StopWheelPanning;
State := KeysToShiftState(Message.Button);
//inherited;
// if Message.Result = 0 then