From 1ee3c9f9b3a5955330648cec0a6e779f27761979 Mon Sep 17 00:00:00 2001 From: graemeg Date: Tue, 26 Feb 2008 12:42:11 +0000 Subject: Minor GDI fix for popup windows. --- src/corelib/gdi/gfx_gdi.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas index 09802c57..05ed1af2 100644 --- a/src/corelib/gdi/gfx_gdi.pas +++ b/src/corelib/gdi/gfx_gdi.pas @@ -808,8 +808,8 @@ begin writeln(' Blockmsg = True (part 1) : ' + PopupListFirst.ClassName); {$ENDIF} // This is ugly but needed for now to get TfpgCombobox to work -// if PopupListFirst.ClassName <> 'TDropDownWindow' then - if not (PopupListFirst is TfpgPopupWindow) then + if (PopupListFirst.ClassName <> 'TDropDownWindow') then +// if not (PopupListFirst is TfpgPopupWindow) then blockmsg := True; end else if (wapplication.TopModalForm <> nil) then -- cgit v1.2.3-70-g09d2