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

Gtk2: do not change color of TScrollBar since it's painted by theme engine.issue #22996

Browse Source 
git-svn-id: trunk@38860 -
This commit is contained in:
zeljko 2012-09-27 14:08:12 +00:00
parent aa29f1f739
commit 8b7dff7f43
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/gtk2/gtk2wscontrols.pp
View File

@ -757,6 +757,10 @@ begin
if not WSCheckHandleAllocated(AWinControl, 'SetColor') if not WSCheckHandleAllocated(AWinControl, 'SetColor')
then Exit; then Exit;
// do not change color of scrollbar. issue #22996
if (AWinControl.FCompStyle = csScrollBar) then
exit;
if ((csOpaque in AWinControl.ControlStyle) and if ((csOpaque in AWinControl.ControlStyle) and
GtkWidgetIsA({%H-}pGtkWidget(AWinControl.handle),GTKAPIWidget_GetType)) then GtkWidgetIsA({%H-}pGtkWidget(AWinControl.handle),GTKAPIWidget_GetType)) then
Exit; Exit;