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

fpspreadsheet: Clarify Rich-text output in TsSpreadsheetInspector.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8564 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-10-17 22:45:23 +00:00
parent 718eacfa3c
commit aba1fc911f
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/visual/fpspreadsheetctrls.pas
View File

@ -3797,7 +3797,7 @@ begin
begin begin
s := ''; s := '';
for rtp in ACell^.RichTextParams do for rtp in ACell^.RichTextParams do
s := Format('%s; Font #%d after pos %d', [s, rtp.FontIndex, rtp.FirstIndex]); s := Format('%s; Font #%d at pos %d', [s, rtp.FontIndex, rtp.FirstIndex]);
Delete(s, 1, 2); Delete(s, 1, 2);
if s = '' then s := '(none)'; if s = '' then s := '(none)';
AStrings.Add('Rich-text parameters='+s); AStrings.Add('Rich-text parameters='+s);