mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 15:47:52 +02:00
* hopefully finally fix of r44186
git-svn-id: trunk@44190 -
This commit is contained in:
parent
2ad3c6dd97
commit
b8a7473fec
@ -2531,7 +2531,7 @@ begin
|
||||
ST^.GrowMode:=gfGrowHiX;
|
||||
Insert(ST);
|
||||
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;
|
||||
Insert(ST);
|
||||
GetExtent(R); R.Grow(-1,-1); Inc(R.A.Y,2);Dec(R.B.Y,5);
|
||||
|
Loading…
Reference in New Issue
Block a user