From 3596127a45a31f231330cbfd827ac713c87a0b49 Mon Sep 17 00:00:00 2001
From: paul <paul@lazarus-ide.org>
Date: Mon, 8 Dec 2008 10:27:07 +0000
Subject: [PATCH] lcl: set default value for TStatusPanel.Alignment

git-svn-id: trunk@17726 -
---
 lcl/comctrls.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lcl/comctrls.pp b/lcl/comctrls.pp
index 61ed69f258..bb4d36945a 100644
--- a/lcl/comctrls.pp
+++ b/lcl/comctrls.pp
@@ -88,7 +88,7 @@ type
     procedure Assign(Source: TPersistent); override;
     function StatusBar: TStatusBar;
   published
-    property Alignment: TAlignment read FAlignment write SetAlignment;
+    property Alignment: TAlignment read FAlignment write SetAlignment default taLeftJustify;
     property Bevel: TStatusPanelBevel read FBevel write SetBevel default pbLowered;
     property Style: TStatusPanelStyle read FStyle write SetStyle default psText;
     property Text: string read FText write SetText;