From 9e35330a167ed1946906e9156e1a7a32d4b0b8e8 Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 17 Jul 2010 10:26:36 +0000 Subject: [PATCH] LCL: LM_WINDOWPOSCHANGING: check for fsFirstShow git-svn-id: trunk@26710 - --- lcl/include/customform.inc | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lcl/include/customform.inc b/lcl/include/customform.inc index e23229c0cb..0b11af081c 100644 --- a/lcl/include/customform.inc +++ b/lcl/include/customform.inc @@ -1315,7 +1315,8 @@ begin if HostDockSite <> nil then Activate; end; LM_WINDOWPOSCHANGING: - if ([csLoading, csDesigning] * ComponentState = [csLoading]) + if (not (csDesigning in ComponentState)) + and (fsFirstShow in FFormState) then begin if (Position in [poDefault, poDefaultPosOnly]) and (WindowState <> wsMaximized)