From dc0d57ef83241f93b98ce0de4cca4930ce561b45 Mon Sep 17 00:00:00 2001 From: bart <9132501-flyingsheep@users.noreply.gitlab.com> Date: Fri, 3 Oct 2014 15:59:25 +0000 Subject: [PATCH] PoChecker: set constraints on mainform (otherwise some controls may get zero height) git-svn-id: trunk@46413 - --- components/pochecker/pocheckermain.lfm | 24 +++++++++++++----------- 1 file changed, 13 insertions(+), 11 deletions(-) diff --git a/components/pochecker/pocheckermain.lfm b/components/pochecker/pocheckermain.lfm index 4a6964d026..ca81d2f2fb 100644 --- a/components/pochecker/pocheckermain.lfm +++ b/components/pochecker/pocheckermain.lfm @@ -1,12 +1,14 @@ object PoCheckerForm: TPoCheckerForm Left = 318 - Height = 511 + Height = 514 Top = 163 Width = 644 Anchors = [] Caption = 'GUI Po-file checking tool' - ClientHeight = 511 + ClientHeight = 514 ClientWidth = 644 + Constraints.MinHeight = 450 + Constraints.MinWidth = 600 OnCreate = FormCreate OnDestroy = FormDestroy ShowInTaskBar = stAlways @@ -121,7 +123,7 @@ object PoCheckerForm: TPoCheckerForm object NoErrLabel: TLabel Left = 8 Height = 25 - Top = 449 + Top = 452 Width = 146 Anchors = [akLeft, akBottom] Caption = 'No errors found' @@ -200,7 +202,7 @@ object PoCheckerForm: TPoCheckerForm object StatusBar: TStatusBar Left = 0 Height = 23 - Top = 488 + Top = 491 Width = 644 Panels = <> end @@ -227,7 +229,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideTop.Side = asrBottom AnchorSideBottom.Control = NoErrLabel Left = 8 - Height = 181 + Height = 184 Top = 233 Width = 272 Anchors = [akTop, akLeft, akBottom] @@ -248,7 +250,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = ClearChildBtn Left = 290 - Height = 151 + Height = 154 Top = 233 Width = 347 Anchors = [akTop, akLeft, akRight, akBottom] @@ -270,7 +272,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideBottom.Control = ClearChildBtn Left = 290 Height = 23 - Top = 394 + Top = 396 Width = 347 Anchors = [akLeft, akRight] BorderSpacing.Top = 5 @@ -313,7 +315,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideBottom.Control = NoErrLabel Left = 8 Height = 25 - Top = 424 + Top = 427 Width = 75 Anchors = [akLeft, akBottom] BorderSpacing.Top = 10 @@ -327,7 +329,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideBottom.Control = NoErrLabel Left = 93 Height = 25 - Top = 424 + Top = 427 Width = 75 Anchors = [akLeft, akBottom] BorderSpacing.Left = 10 @@ -341,7 +343,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideBottom.Control = NoErrLabel Left = 290 Height = 25 - Top = 424 + Top = 427 Width = 75 Anchors = [akLeft, akBottom] Caption = 'Clear' @@ -354,7 +356,7 @@ object PoCheckerForm: TPoCheckerForm AnchorSideBottom.Control = NoErrLabel Left = 375 Height = 25 - Top = 424 + Top = 427 Width = 75 Anchors = [akLeft, akBottom] BorderSpacing.Left = 10