paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 18:39:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: fix grids bidi TAB behaviour as by Zaher Dirkey comments, issue #38186

Browse Source 
git-svn-id: trunk@64402 -
This commit is contained in:
jesus 2021-01-17 19:08:22 +00:00
parent 20f6b975cf
commit 618596c2ba
1 changed files with 0 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lcl/grids.pas
View File

@ -9095,16 +9095,6 @@ var
DeltaRow := 0; DeltaRow := 0;
aa := AAutoAdvance; aa := AAutoAdvance;
if UseRightToLeftAlignment then
case AAutoAdvance of
aaLeftUp: aa := aaRightUp;
aaLeftDown: aa := aaRightDown;
aaLeft: aa := aaRight;
aaRightUp: aa := aaLeftUp;
aaRightDown: aa := aaLeftDown;
aaRight: aa := aaLeft;
end;
// invert direction if necessary
if Inverse then if Inverse then
case aa of case aa of
aaRight: aa := aaLeft; aaRight: aa := aaLeft;