To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=55575


User sg changed the following:

                  What    |Old value                 |New value
================================================================================
               Assigned to|sw                        |sg
--------------------------------------------------------------------------------




------- Additional comments from [EMAIL PROTECTED] Fri Oct  7 01:06:45 -0700 
2005 -------
The following macro works for me:

sub Main
        dim separator as new com.sun.star.text.TableColumnSeparator
        
        ' insert table
        xTextTable = ThisComponent.createInstance("com.sun.star.text.TextTable")
        xTextTable.initialize(3,5)
        xText = ThisComponent.Text
        xText.insertTextContent(xText, xTextTable, true)

        separatorArray = xTextTable.TableColumnSeparators
        
        ' change column separators
        for i = 0 to ubound(separatorArray)
                separator = separatorArray(i)
                separator.Position = separator.Position / 2
                separatorArray(i) = separator
        next i

        ' write separators back 
        xTextTable.TableColumnSeparators = separatorArray
end sub

---------------------------------------------------------------------
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]

Reply via email to