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

Win32, PageControl: remove white flicker when switching tabs. Issue #0037161 Patch by BrunoK

Browse Source 
git-svn-id: trunk@63261 -
This commit is contained in:
martin 2020-06-01 19:05:59 +00:00
parent 815371c9aa
commit e6702de323
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/win32/win32pagecontrol.inc
View File

@ -58,7 +58,7 @@ end;
function ShowHideTabPage(TabControlHandle: HWnd; Showing: boolean): integer;
const
ShowFlags: array[Boolean] of DWord = (SWP_HIDEWINDOW or SWP_NOZORDER, SWP_SHOWWINDOW);
ShowFlags: array[Boolean] of DWord = (SWP_HIDEWINDOW or SWP_NOZORDER or SWP_NOREDRAW, SWP_SHOWWINDOW);
var
TabControl: TCustomTabControl;
PageIndex: Integer;