paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 13:39:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: Fix lines inside an IFDEF that confused the debugger.

Browse Source 
git-svn-id: trunk@62088 -
This commit is contained in:
juha 2019-10-19 08:38:33 +00:00
parent 7023c973e2
commit 313849e97b
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/grids.pas
View File

@ -3445,8 +3445,7 @@ var
begin
if HandleAllocated then begin
{$Ifdef DbgScroll}
DebugLn('Scrollbar
Page: Which=',SbToStr(Which), ' Avalue=',dbgs(aPage));
DebugLn('Scrollbar Page: Which=',SbToStr(Which), ' Avalue=',dbgs(aPage));
{$endif}
ScrollInfo.cbSize := SizeOf(ScrollInfo);
ScrollInfo.fMask := SIF_PAGE;