From d176f7a417b4715092e303673fc8406d0e715f68 Mon Sep 17 00:00:00 2001
From: joost <joost@cnoc.nl>
Date: Sat, 16 Feb 2008 22:43:30 +0000
Subject: [PATCH]  * Set the default alignment of TNumericFields to
 taRightJustify. (Patch from Jesus Reyes, bug #9456)

git-svn-id: trunk@10346 -
---
 packages/fcl-db/src/base/db.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/packages/fcl-db/src/base/db.pas b/packages/fcl-db/src/base/db.pas
index e8c372670e..331a14e45e 100644
--- a/packages/fcl-db/src/base/db.pas
+++ b/packages/fcl-db/src/base/db.pas
@@ -501,6 +501,7 @@ type
   public
     constructor Create(AOwner: TComponent); override;
   published
+    property Alignment default taRightJustify;
     property DisplayFormat: string read FDisplayFormat write SetDisplayFormat;
     property EditFormat: string read FEditFormat write SetEditFormat;
   end;