paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 00:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* copy operator of TEnhancedVideoCell now copies the 8-bit foreground and background colors

Browse Source
This commit is contained in:
Nikolay Nikolov 2022-03-16 08:08:24 +02:00
parent 61623c43ca
commit 3eae0213be
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/rtl-console/src/inc/video.inc
View File

@ -113,7 +113,8 @@ end;
class operator TEnhancedVideoCell.Copy(constref aSrc: TEnhancedVideoCell; var aDst: TEnhancedVideoCell);
begin
aDst.ExtendedGraphemeCluster := aSrc.ExtendedGraphemeCluster;
aDst.Attribute := aSrc.Attribute;
aDst.FForegroundColor := aSrc.FForegroundColor;
aDst.FBackgroundColor := aSrc.FBackgroundColor;
end;
Const