XLSReadWriteII 5 - Maximum number of fonts exceeded
Posted: Fri Dec 07, 2012 8:41 am
Hi.
I got an error box '' some text formatting may have changed in this file because the maximum number of font was exceeded'' when setting the BorderBottomStyle
for a xls (Excel97) file. And also ExcelFile.Items[0].Name does not seem to work properly
Sample code:
var
ExcelFile : TXLSReadWriteII5;
begin
ExcelFile := TXLSReadWriteII5.Create(nil);
ExcelFile.Version := xvExcel97;
ExcelFile.Filename := 'C:\output.xls';
ExcelFile.Items[0].Name := 'test'; <- does not change the sheetname
ExcelFile[0].InsertStringRowValues(0,0,['hallo', 'test']);
ExcelFile.items[0].Cell[1,0].BorderBottomStyle := cbsthick; <- error if I try to open the file in excel
ExcelFile.Write;
end;
Any help would be appreciated.
Thanks in advance
d3nton
I got an error box '' some text formatting may have changed in this file because the maximum number of font was exceeded'' when setting the BorderBottomStyle
for a xls (Excel97) file. And also ExcelFile.Items[0].Name does not seem to work properly
Sample code:
var
ExcelFile : TXLSReadWriteII5;
begin
ExcelFile := TXLSReadWriteII5.Create(nil);
ExcelFile.Version := xvExcel97;
ExcelFile.Filename := 'C:\output.xls';
ExcelFile.Items[0].Name := 'test'; <- does not change the sheetname
ExcelFile[0].InsertStringRowValues(0,0,['hallo', 'test']);
ExcelFile.items[0].Cell[1,0].BorderBottomStyle := cbsthick; <- error if I try to open the file in excel
ExcelFile.Write;
end;
Any help would be appreciated.
Thanks in advance
d3nton