TsWorkbookTabControl: coloured tabs
lazarus / 49-FPSpreadsheet

----------------------------------------------------------------------
MAndreato · 2020-02-10 10:34

Hi,

both Excel and LibreOffice do support coloured tabs. Actually it seems
that TsWorkbookTabControl of FPSpreadsheet 1.10.1 does not.
Is anybody working on this feature?

Thanks in advance!

----------------------------------------------------------------------
wp · 2020-02-10 10:57

No, at least not me. The TsWorkbookTabControl is a standard
TTabControl descendant which is drawn by the widgetset and therefore
does not support colored tabs in general. Using a third-party tab
control, such as ATTabs from ATFlatControls, would make it possible,
though, but this would pull in the dependence on another library which
I want to avoid. But nothing prevents you from doing this yourself in
your application. Use ATTabs instead of TTabSheet and build its simple
spreadsheet functionality yourself taking the code of
TsWorkbookTabControl as a template.

One thing to be mentioned is that the current file reader/writers
ignore the tab color in the files.

----------------------------------------------------------------------
MAndreato · 2020-02-10 11:57

Thanks wp,
using ATTabs to have coloured sheets could be an interesting exercise,
but maybe more important would be having the "engine" to be able to
read/write them from/to file before.

----------------------------------------------------------------------
wp · 2020-02-10 15:40

I added a property TsWorkbook.TabColor which is written and read for
the xlsx, ods and Excel8 xls formats - not supported by the others.
The property is also ignored by the WorkbookTabControl.

Note that the new property requires the trunk version of fpspreadsheet
which you can install via svn or after downloading the recent snapshot
from https://sourceforge.net/code-snapshots/svn/l/la/lazarus-
ccr/svn/lazarus-ccr-svn-r7326-components-fpspreadsheet.zip.

----------------------------------------------------------------------
MAndreato · 2020-02-10 16:35

That's great, thanks!
I'll try it next week.