From 44d55b2eb10d892c33ae93442592a878e8dc6151 Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Sat, 9 Feb 2002 01:47:52 +0000
Subject: [PATCH] MG: added paint messages for some gtk internal widgets

git-svn-id: trunk@1108 -
---
 lcl/interfaces/gtk/gtkproc.inc | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lcl/interfaces/gtk/gtkproc.inc b/lcl/interfaces/gtk/gtkproc.inc
index 101619f275..de67d5db92 100644
--- a/lcl/interfaces/gtk/gtkproc.inc
+++ b/lcl/interfaces/gtk/gtkproc.inc
@@ -1825,6 +1825,10 @@ procedure ConnectInternalWidgetsSignals(AWidget: PGtkWidget;
       ConnectSignals(ScrolledWindow^.hscrollbar);
       ConnectSignals(ScrolledWindow^.vscrollbar);
     end;
+    if GtkWidgetIsA(TheWidget,GTK_COMBO_TYPE) then begin
+      ConnectSignals(PGtkCombo(TheWidget)^.entry);
+      ConnectSignals(PGtkCombo(TheWidget)^.button);
+    end;
   end;
 
   procedure ConnectSignals(TheWidget: PGtkWidget);
@@ -1861,7 +1865,6 @@ procedure ConnectInternalWidgetsSignals(AWidget: PGtkWidget;
     ConnectChilds(TheWidget);
   end;
   
-
 begin
   if (AWinControl=nil) or (AWidget=nil)
   or (not (csDesigning in AWinControl.ComponentState)) then exit;
@@ -3445,6 +3448,9 @@ end;
  { =============================================================================
 
   $Log$
+  Revision 1.121  2002/10/10 08:51:15  lazarus
+  MG: added paint messages for some gtk internal widgets
+
   Revision 1.120  2002/10/09 10:22:55  lazarus
   MG: fixed client origin coordinates