FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index Bugs report & fixes / Informe de errores y arreglos crash in export date TXBrwColumn to excel
Posts: 375
Joined: Tue Feb 10, 2015 09:48 AM
crash in export date TXBrwColumn to excel
Posted: Wed May 17, 2017 02:45 PM
Hello,
Exporting to excel a xBrowse column of type Date, the program crashes in this line:
Code (fw): Select all Collapse
oSheet:Cells( nRow, nCol ):NumberFormat   := Lower( Set( _SET_DATEFORMAT ) )

at begin of the
Code (fw): Select all Collapse
METHOD ToExcel( oSheet, nRow, nCol ) CLASS TXBrwColumn


It is because I have excel in Italian and the dateFormat is like dd/mm/yyyy.
I put here the same fix I see in another place in the same file:
Code (fw): Select all Collapse
      if lxlEnglish
        if ValType( ::cEditPicture ) == 'C' .and. Left( ::cEditPicture, 1 ) != '@'
           oSheet:Cells( nRow,nCol ):NumberFormat := Lower( ::cEditPicture )
        else
           oSheet:Cells( nRow,nCol ):NumberFormat := Lower( Set( _SET_DATEFORMAT ) )
        endif
      endif

I see that for OOCalc export there is a GetNumberFormatId that convert it for localized formats, maybe we can do it for excel too...

Continue the discussion