From 2cb5dbe9de599549becfeb2fe72472d877b0ff89 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 11 Aug 2003 18:10:41 +0000
Subject: [PATCH] fixed combobox height from Micha

git-svn-id: trunk@4463 -
---
 lcl/interfaces/win32/win32callback.inc | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lcl/interfaces/win32/win32callback.inc b/lcl/interfaces/win32/win32callback.inc
index 806417fd2e..629db1d6f3 100644
--- a/lcl/interfaces/win32/win32callback.inc
+++ b/lcl/interfaces/win32/win32callback.inc
@@ -502,6 +502,8 @@ Begin
     End;
     WM_SIZE:
     Begin
+      if not (OwnerObject is TCustomComboBox) then
+      begin
       With TLMSize(LMessage) Do
       Begin
         Msg := LM_SIZE;
@@ -516,6 +518,7 @@ Begin
         if (Windows.GetWindowLong(Window, GWL_STYLE) and WS_HSCROLL) <> 0 then
           Height := Height - GetSystemMetrics(SM_CYHSCROLL);
       End;
+      end;
     End;
     WM_SYSKEYDOWN:
     Begin
@@ -638,6 +641,9 @@ end;
 
 {
   $Log$
+  Revision 1.47  2003/08/11 18:10:41  mattias
+  fixed combobox height from Micha
+
   Revision 1.46  2003/08/09 16:30:33  mattias
   fixed LM_ShowModal for win32 intf from Karl