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


User mroe changed the following:

                What    |Old value                 |New value
================================================================================
                      CC|''                        |'mroe'
--------------------------------------------------------------------------------




------- Additional comments from [EMAIL PROTECTED] Tue Apr  3 09:06:45 +0000 
2007 -------
Now there is OOo 2.2 out - and this bug exists furthermore.

A interesting thing is that the recorder create other code if you record the
using of the icon for the border formatting.

So you can rewrite the above code as

sub Main 
rem ---------------------------------------------------------------------- 
rem define variables 
dim document   as object 
dim dispatcher as object 
rem ---------------------------------------------------------------------- 
rem get access to the document 
document   = ThisComponent.CurrentController.Frame 
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") 
 
rem ---------------------------------------------------------------------- 
dim args2(12) as new com.sun.star.beans.PropertyValue 
args2(0).Name = "OuterBorder.LeftBorder" 
args2(0).Value = Array(0,0,2,0) 
args2(1).Name = "OuterBorder.LeftDistance" 
args2(1).Value = 0 
args2(2).Name = "OuterBorder.RightBorder" 
args2(2).Value = Array(0,0,2,0) 
args2(3).Name = "OuterBorder.RightDistance" 
args2(3).Value = 0 
args2(4).Name = "OuterBorder.TopBorder" 
args2(4).Value = Array(0,0,2,0) 
args2(5).Name = "OuterBorder.TopDistance" 
args2(5).Value = 0 
args2(6).Name = "OuterBorder.BottomBorder" 
args2(6).Value = Array(0,0,2,0) 
args2(7).Name = "OuterBorder.BottomDistance" 
args2(7).Value = 0 
args2(8).Name = "InnerBorder.Horizontal" 
args2(8).Value = Array(0,0,0,0) 
args2(9).Name = "InnerBorder.Vertical" 
args2(9).Value = Array(0,0,2,0) 
args2(10).Name = "InnerBorder.Flags" 
args2(10).Value = 1 
args2(11).Name = "InnerBorder.ValidFlags" 
args2(11).Value = 127 
args2(12).Name = "InnerBorder.DefaultDistance" 
args2(12).Value = 0 
 
dispatcher.executeDispatch(document, ".uno:SetBorderStyle", "", 0, args2()) 
 
end sub

This works.


Is there a explanation for the difference between the use of
".uno:BorderOuter"/".uno:BorderInner" and ".uno:SetBorderStyle" with the
definitions of "InnerBorder" and "OuterBorder"?
Where can i find the specifications for the dispatch parameters, especially for
the ".uno:"-constructs and their accepted properties?


Mathias

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