From 9db54bbccc81c916e2a818418c38dcc8fb5a8ff9 Mon Sep 17 00:00:00 2001 From: paul Date: Tue, 16 Oct 2007 03:35:32 +0000 Subject: [PATCH] fix compilation for non 4.3 qt issue(0009949) git-svn-id: trunk@12485 - --- lcl/interfaces/qt/qtwidgets.pas | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas index e6e0d73a6b..9844d5f6fc 100644 --- a/lcl/interfaces/qt/qtwidgets.pas +++ b/lcl/interfaces/qt/qtwidgets.pas @@ -3298,11 +3298,10 @@ begin end; {$else} if (TCustomForm(LCLObject).FormStyle = fsSplash) and - not (csDesigning in ComponentState) then - then - Result := QWidget_create(nil, QtSplashScreen); + not (csDesigning in LCLObject.ComponentState) then + Result := QWidget_create(nil, QtSplashScreen) else - Result := QWidget_create(nil, QtWindow); + Result := QWidget_create(nil, QtWindow); {$endif} // Main menu bar