From ad7de21ad98f632dcbeeea89d4b769a48482389f Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 13 Jun 2009 14:27:33 +0000
Subject: [PATCH] LCL: ChildSizing.Layout align right only when
 BidiMode=bdRightToLeft

git-svn-id: trunk@20618 -
---
 lcl/include/wincontrol.inc | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lcl/include/wincontrol.inc b/lcl/include/wincontrol.inc
index ec96ab77b5..2dc733fc0a 100644
--- a/lcl/include/wincontrol.inc
+++ b/lcl/include/wincontrol.inc
@@ -1408,7 +1408,7 @@ begin
         LineMax:=ChildCount[asboHorizontal];
         Row:=i div LineMax;
         Col:=i mod LineMax;
-        if (BiDiMode<>bdLeftToRight) then
+        if (BiDiMode=bdRightToLeft) then
           Col:=LineMax-Col-1;
         ChildBox:=Childs[asboHorizontal][Col].Childs[asboVertical][Row];
         ChildBox.SetControl(ChildControl);
@@ -1419,7 +1419,7 @@ begin
         LineMax:=ChildCount[asboVertical];
         Col:=i div LineMax;
         Row:=i mod LineMax;
-        if (BiDiMode<>bdLeftToRight) then
+        if (BiDiMode=bdRightToLeft) then
           Col:=LineMax-Col-1;
         ChildBox:=Childs[asboVertical][Row].Childs[asboHorizontal][Col];
         ChildBox.SetControl(ChildControl);
@@ -2143,7 +2143,7 @@ begin
   //WriteDebugReport('after SumTable');
   ResizeTable(ChildSizing,TargetWidth,TargetHeight);
   //WriteDebugReport('after ResizeTable');
-  if BiDiMode<>bdLeftToRight then
+  if BiDiMode=bdRightToLeft then
     AlignToRight(TargetWidth);
   //WriteDebugReport('after AlignToRight');
   ComputeTableControlBounds(ChildSizing,BiDiMode);