To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=59970
Issue #:|59970
Summary:|non-display of LF/CR after using setArray
Component:|Spreadsheet
Version:|OOo 2.0.1
Platform:|PC
URL:|
OS/Version:|Windows XP
Status:|UNCONFIRMED
Status whiteboard:|
Keywords:|
Resolution:|
Issue type:|DEFECT
Priority:|P5
Subcomponent:|programming
Assigned to:|spreadsheet
Reported by:|shivisi
------- Additional comments from [EMAIL PROTECTED] Mon Jan 2 14:16:16 -0800
2006 -------
1) Open a new Calc spreadsheet
2) Copy the following code into a new module.
(The code should write into each cell, two letters separated by chr(10))
3) The letters they should appear on separate lines within the cell; they appear
on the same line
4) Press F2 (to edit the cell contents)
(The letters appear on separate lines in the cell itself, but there is no
change in the text in the formula bar)
5) Without leaving edit mode, add and delete a space at the end of the text
6) The cell displays properly, and the formula bar text now displays a space
---------------------------------------------
Sub Main
Dim oSheet As Object, oRange As Object
Dim DataArrayMain(), DataArrayTemp(9)
Dim lngInCounter As Long, lngOutCounter As Long
For lngOutCounter=0 To 9
For lngInCounter=0 To 9
DataArrayTemp(lngInCounter)=chr(65+lngInCounter) & chr(10) &
chr(lngOutCounter+65)
Next
Redim Preserve DataArrayMain(lngOutCounter)
DataArrayMain(lngOutCounter)=Array(DataArrayTemp(0), DataArrayTemp(1),
DataArrayTemp(2), DataArrayTemp(3), DataArrayTemp(4), DataArrayTemp(5),
DataArrayTemp(6), DataArrayTemp(7), DataArrayTemp(8), DataArrayTemp(9))
Next
oSheet=ThisComponent.sheets(0)
oRange=oSheet.getCellRangeByPosition(0,0,9,9)
oRange.setDataArray(DataArrayMain())
End Sub
---------------------------------------------------
I tested this on two WinXP machines, OOo 2.0.0/2.0.1
I've tried using chr(13), chr(10), chr(13) & chr(10). None work.
---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
