Apache OpenOffice (AOO) Bugzilla – Issue 23114
API: ScUniqueCellFormatsObj::XEnumerationAccess
Last modified: 2013-02-24 21:08:57 UTC
The resulting XEnumeration doesn't return the first of it's elements. Additionally this component isn't yet part of the module-description for sc
I take it
Sub ContainerTest oDocument = StarDesktop.getCurrentComponent oSheet = oDocument.getCurrentController.getActiveSheet oSheet.getCellRangeByName("A1:A5").CellBackColor = RGB(0,255,0) oSheet.getCellRangeByName("A6:B10").CellBackColor = RGB(255,0,0) oSheet.getCellRangeByName("B1:B6").CellBackColor = RGB(0,0,255) oSheet.getCellRangeByName("B7").CellBackColor = RGB(0,255,0) oSheet.getCellRangeByName("B8:B10").CellBackColor = RGB(0,0,255) oSheet.getCellRangeByName("C1:C10").CellBackColor = RGB(0,0,255) oSheet.getCellRangeByName("D1:D10").CellBackColor = RGB(0,255,0) oContainer = oSheet.getCellRangeByName("A1:D10").CellFormatRanges ' index access For i = 0 to oContainer.Count -1 Print i, oContainer.getByIndex(i).getRangeAddressesAsString Next i ' enumeration access oEnum = oContainer.createEnumeration While oEnum.hasMoreElements oRanges = oEnum.nextElement Print oRanges.getRangeAddressesAsString() Wend End Sub I am missing the first container with the enumeration access ... What I am doing wrong ?
A macro to reproduce this is: Sub Main oDoc = ThisComponent oSheet = oDoc.Sheets(0) oSheet.getCellRangeByName("A1:A5").CellBackColor = RGB(0,255,0) oSheet.getCellRangeByName("A6:B10").CellBackColor = RGB(255,0,0) oSheet.getCellRangeByName("B1:B6").CellBackColor = RGB(0,0,255) oSheet.getCellRangeByName("B7").CellBackColor = RGB(0,255,0) oSheet.getCellRangeByName("B8:B10").CellBackColor = RGB(0,0,255) oSheet.getCellRangeByName("C1:C10").CellBackColor = RGB(0,0,255) oSheet.getCellRangeByName("D1:D10").CellBackColor = RGB(0,255,0) ' msgbox oSheet.getCellRangeByName("A1:D10").dbg_methods oContainer = oSheet.getCellRangeByName("A1:D10").getUniqueCellFormatRanges ' index access For i = 0 to oContainer.Count -1 Print i, oContainer(i).getRangeAddressesAsString Next i ' enumeration access oEnum = oContainer.createEnumeration While oEnum.hasMoreElements oRanges = oEnum.nextElement Print oRanges.getRangeAddressesAsString Wend End Sub fixed in calcuno01
SW: added java-testcases and corresponding objdsc to the cws
please verify the complete API of Calc and Draw (I changed some things in the XShape implementation and added XTollerantMultiPropertySet) I also added XTollerantMultiPropertySet on some calc services.
resetting the fixed state
works fine in cws_calcuno01 => verified
part of src680_m89 => closed