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

fpspreadsheet: Fix writing default colwidth to xlsx (was applied only to first column so far).

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4576 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-03-19 16:39:43 +00:00
parent 840ff82715
commit a46928c3a3
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/xlsxooxml.pas
View File

@ -3000,7 +3000,7 @@ begin
w := AWorksheet.ReadDefaultColWidth(suChars);
h := AWorksheet.ReadDefaultRowHeight(suPoints);
AppendToStream(AStream, Format(
'<sheetFormatPr baseColWidth="%.2f" defaultRowHeight="%.2f" customHeight="true" />',
'<sheetFormatPr baseColWidth="10" defaultColWidth="%.2f" defaultRowHeight="%.2f" customHeight="true" />',
[w, h],
FPointSeparatorSettings));
end;