diff options
Diffstat (limited to 'wizards')
-rw-r--r-- | wizards/source/sfwidgets/SF_Menu.xba | 8 | ||||
-rw-r--r-- | wizards/source/sfwidgets/SF_MenuListener.xba | 4 |
2 files changed, 6 insertions, 6 deletions
diff --git a/wizards/source/sfwidgets/SF_Menu.xba b/wizards/source/sfwidgets/SF_Menu.xba index 308e959d1cee..d9f0bde0358a 100644 --- a/wizards/source/sfwidgets/SF_Menu.xba +++ b/wizards/source/sfwidgets/SF_Menu.xba @@ -64,7 +64,7 @@ Option Explicit ''' End With ''' ''' Service invocation: -''' Dim ui As ObjectoDoc As Object, myMenu As Object +''' Dim ui As Object, oDoc As Object, myMenu As Object ''' Set ui = CreateScriptService("UI") ''' Set oDoc = ui.GetDocument(ThisComponent) ''' Set myMenu = oDoc.CreateMenu("My own menu") @@ -178,7 +178,7 @@ Public Function AddCheckBox(Optional ByVal MenuItem As Variant _ ''' - the menu header ''' - the name of the clicked menu item ''' - the numeric identifier of the clicked menu item -''' - "1" when the status is "checked", otherwide "0" +''' - "1" when the status is "checked", otherwise "0" ''' Arguments Command and Script are mutually exclusive. ''' Returns: ''' The numeric identification of the newly inserted item @@ -340,7 +340,7 @@ Public Function AddRadioButton(Optional ByVal MenuItem As Variant _ ''' - the menu header ''' - the name of the clicked menu item ''' - the numeric identifier of theclicked menu item -''' - "1" when the status is "checked", otherwide "0" +''' - "1" when the status is "checked", otherwise "0" ''' Arguments Command and Script are mutually exclusive. ''' Returns: ''' The numeric identification of the newly inserted item @@ -587,4 +587,4 @@ Private Function _Repr() As String End Function ' SFWidgets.SF_Menu._Repr REM ============================================ END OF SFWIDGETS.SF_MENU -</script:module>
\ No newline at end of file +</script:module> diff --git a/wizards/source/sfwidgets/SF_MenuListener.xba b/wizards/source/sfwidgets/SF_MenuListener.xba index 0b1f2b6fd0e5..462816cba4f5 100644 --- a/wizards/source/sfwidgets/SF_MenuListener.xba +++ b/wizards/source/sfwidgets/SF_MenuListener.xba @@ -82,7 +82,7 @@ Try: oMenu = poEvent.Source With oMenu - ' Collect command (script or menu command) and status radiobttons and checkboxes + ' Collect command (script or menu command) and status radiobuttons and checkboxes sCommand = .getCommand(iMenuId) bStatus = .isItemChecked(iMenuId) End With @@ -125,4 +125,4 @@ Sub _SFMENU_disposing(Optional poEvent As Object) ' com.sun.star.awt.Menu End Sub ' SFWidgets.SF_MenuListener._SFMENU_disposing REM ============================================ END OF SFDIALOGS.SF_DIALOGLISTENER -</script:module>
\ No newline at end of file +</script:module> |