Compilando com minigui extends, quando tento exportar um relatório do fastreports para o excel dá esse erro.
Acontece depois do relatório já preparado na função FrPrn:DoExport( "XLSExport" ).
Tô usando o Windows 10 com office 2013. Tentei em um computador com Windows 7 e office 2010 e acontece a mesma coisa...
Chega a gerar o arquivo do Excel mas sem conteudo... gera um arquivo vazio...
Fonte
cFileExcel := cEmpresa + ' - Balanco 2017.xls'
FrPrn:=frReportManager():new()
FrPrn:SetWorkArea( Alias(), Select() )
FrPrn:LoadFromFile( hb_Dirbase() + 'Balanco.Fr3')
FrPrn:SetProperty("XLSExport","FileName", cFileExcel )
FrPrn:SetProperty("XLSExport","ShowDialog",.f.)
FrPrn:SetProperty("XLSExport","ShowProgress",.f.)
FrPrn:SetProperty("XLSExport","OpenAfterExport", .f. )
FrPrn:SetProperty("PDFExport","OpenExcelAfterExport",.f. )
FrPrn:SetProperty("PDFExport","ExportStyles",.t. )
FrPrn:PrepareReport()
FrPrn:DoExport( "XLSExport" )
FrPrn:DestroyFR()
e a imagem do erro:
Obrigado
Rubens