From 07085f0cb0c782782265f1d69eec67542c38ecaf Mon Sep 17 00:00:00 2001 From: paul Date: Mon, 1 Oct 2007 00:41:35 +0000 Subject: [PATCH] gtk2: set font color to ListBox from anatol (issue #0009824) git-svn-id: trunk@12259 - --- lcl/interfaces/gtk2/gtk2wsstdctrls.pp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lcl/interfaces/gtk2/gtk2wsstdctrls.pp b/lcl/interfaces/gtk2/gtk2wsstdctrls.pp index 44994de7c1..4617710e09 100644 --- a/lcl/interfaces/gtk2/gtk2wsstdctrls.pp +++ b/lcl/interfaces/gtk2/gtk2wsstdctrls.pp @@ -515,9 +515,9 @@ begin Widget:=GetWidgetInfo(Pointer(AWinControl.Handle),True)^.CoreWidget; Gtk2WidgetSet.SetWidgetColor(Widget, AWinControl.Font.Color, clNone, - [GTK_STATE_NORMAL,GTK_STATE_ACTIVE,GTK_STATE_PRELIGHT,GTK_STATE_SELECTED]); - Gtk2WidgetSet.SetWidgetFont(Widget, AFont); - + [GTK_STATE_NORMAL,GTK_STATE_ACTIVE,GTK_STATE_PRELIGHT,GTK_STATE_SELECTED, + GTK_STYLE_TEXT]); + Gtk2WidgetSet.SetWidgetFont(Widget, AFont); end; class function TGtk2WSCustomListBox.CreateHandle(const AWinControl: TWinControl;