pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fpspreadsheet: Do not unmerge cells in Worksheet.EraseCell when parameter KeepFormat is true.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8047 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2021-06-03 09:59:51 +00:00
parent 8d8f41afd1
commit a7913ef0a4
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/source/common/fpspreadsheet.pas
View File

@ -2013,7 +2013,7 @@ begin
c := ACell^.Col;
// Unmerge range if the cell is the base of a merged block
if IsMergeBase(ACell) then
if IsMergeBase(ACell) and not AKeepFormat then
UnmergeCells(r, c);
// Remove the comment if the cell has one