mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-19 18:51:31 +02:00
parent
295041e523
commit
9e530ac2c8
@ -3438,7 +3438,7 @@ begin
|
|||||||
FMemo.UseParentFont := False;
|
FMemo.UseParentFont := False;
|
||||||
FMemo.Font.Name := 'Calibri';
|
FMemo.Font.Name := 'Calibri';
|
||||||
FMemo.StretchMode := smActualHeight;
|
FMemo.StretchMode := smActualHeight;
|
||||||
TMemoFriend(FMemo).WordWrapOverflow:=wwoOverflow;
|
TMemoFriend(FMemo).WordOverflow:=woOverflow;
|
||||||
TMemoFriend(FMemo).CreateRTLayout;
|
TMemoFriend(FMemo).CreateRTLayout;
|
||||||
TMemoFriend(FMemo).RecalcLayout;
|
TMemoFriend(FMemo).RecalcLayout;
|
||||||
AssertEquals('Failed on 1', 1, FMemo.TextLines.Count);
|
AssertEquals('Failed on 1', 1, FMemo.TextLines.Count);
|
||||||
@ -3456,7 +3456,7 @@ begin
|
|||||||
FMemo.UseParentFont := False;
|
FMemo.UseParentFont := False;
|
||||||
FMemo.Font.Name := 'Calibri';
|
FMemo.Font.Name := 'Calibri';
|
||||||
FMemo.StretchMode := smActualHeight;
|
FMemo.StretchMode := smActualHeight;
|
||||||
TMemoFriend(FMemo).WordWrapOverflow:=wwoSplit;
|
TMemoFriend(FMemo).WordOverflow:=woSplit;
|
||||||
TMemoFriend(FMemo).CreateRTLayout;
|
TMemoFriend(FMemo).CreateRTLayout;
|
||||||
TMemoFriend(FMemo).RecalcLayout;
|
TMemoFriend(FMemo).RecalcLayout;
|
||||||
AssertEquals('Failed on 1', 2, FMemo.TextLines.Count);
|
AssertEquals('Failed on 1', 2, FMemo.TextLines.Count);
|
||||||
|
Loading…
Reference in New Issue
Block a user