mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 19:09:27 +02:00
Revert part of previous commit, not related to typos fixes
git-svn-id: trunk@44187 -
This commit is contained in:
parent
ade50d3b50
commit
314c4552e5
@ -2531,7 +2531,7 @@ begin
|
|||||||
ST^.GrowMode:=gfGrowHiX;
|
ST^.GrowMode:=gfGrowHiX;
|
||||||
Insert(ST);
|
Insert(ST);
|
||||||
GetExtent(R); R.Grow(-1,-1); Inc(R.A.Y,1); R.B.Y:=R.A.Y+1;
|
GetExtent(R); R.Grow(-1,-1); Inc(R.A.Y,1); R.B.Y:=R.A.Y+1;
|
||||||
New(ST, Init(R, CharStr('ħ, MaxViewWidth)));
|
New(ST, Init(R, CharStr('Ä', MaxViewWidth)));
|
||||||
ST^.GrowMode:=gfGrowHiX;
|
ST^.GrowMode:=gfGrowHiX;
|
||||||
Insert(ST);
|
Insert(ST);
|
||||||
GetExtent(R); R.Grow(-1,-1); Inc(R.A.Y,2);Dec(R.B.Y,5);
|
GetExtent(R); R.Grow(-1,-1); Inc(R.A.Y,2);Dec(R.B.Y,5);
|
||||||
|
Loading…
Reference in New Issue
Block a user