summaryrefslogtreecommitdiff
path: root/testautomation/graphics/optional/includes/global/id_008.inc
diff options
context:
space:
mode:
Diffstat (limited to 'testautomation/graphics/optional/includes/global/id_008.inc')
-rw-r--r--testautomation/graphics/optional/includes/global/id_008.inc71
1 files changed, 0 insertions, 71 deletions
diff --git a/testautomation/graphics/optional/includes/global/id_008.inc b/testautomation/graphics/optional/includes/global/id_008.inc
deleted file mode 100644
index 654cae0f00df..000000000000
--- a/testautomation/graphics/optional/includes/global/id_008.inc
+++ /dev/null
@@ -1,71 +0,0 @@
-'encoding UTF-8 Do not remove or change this line!
-'**************************************************************************
-' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
-'
-' Copyright 2000, 2010 Oracle and/or its affiliates.
-'
-' OpenOffice.org - a multi-platform office productivity suite
-'
-' This file is part of OpenOffice.org.
-'
-' OpenOffice.org is free software: you can redistribute it and/or modify
-' it under the terms of the GNU Lesser General Public License version 3
-' only, as published by the Free Software Foundation.
-'
-' OpenOffice.org is distributed in the hope that it will be useful,
-' but WITHOUT ANY WARRANTY; without even the implied warranty of
-' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-' GNU Lesser General Public License version 3 for more details
-' (a copy is included in the LICENSE file that accompanied this code).
-'
-' You should have received a copy of the GNU Lesser General Public License
-' version 3 along with OpenOffice.org. If not, see
-' <http://www.openoffice.org/license.html>
-' for a copy of the LGPLv3 License.
-'
-'/************************************************************************
-'*
-'* Owner : wolfram.garten@oracle.com
-'*
-'* short description :
-'*
-'******************************************************************
-' #1 tiWindowNewWindow
-' #1 tidWindow123 'wrn:2
-'\*****************************************************************
-
-testcase tiWindowNewWindow
-
- Call hNewDocument
- Call hRechteckErstellen ( 10, 10, 20, 40 )
- WindowNewWindow
- WaitSlot (2000)
- Call hCloseDocument
-endcase
-
-testcase tidWindow123
- goto endsub '' testing TBO: 29.03.2002
- dim iMenues as integer
- Call hNewDocument
- Call hRechteckErstellen ( 10, 10, 20, 40 )
-
- Kontext "DocumentImpress"
- DocumentImpress.UseMenu
- iMenues = MenuGetItemCount
- warnlog "---- Number of Main menus: " & iMenues
- MenuSelect(Menugetitemid(8))
- sleep 1
- iMenues = MenuGetItemCount
- printlog "---- Number of Main menus: " & iMenues
- ' MenuSelect(Menugetitemid(14))
- sleep 1
- i=1
- printlog "count: " + i + "; of submenu: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
- i=2
- printlog "count: " + i + "; of submenu: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
- warnlog "Dynamic entries not accessible ? :-((((("
- ' i=3
- ' printlog "count: " + i + "; of submenue: " + MenuGetItemCount + "; SID: " + MenuGetItemId (i) + "; Text: " + MenuGetItemText (Menugetitemid(i)) + "; Command: " + MenuGetItemCommand(Menugetitemid(i)) + "; Seperator?: " + MenuIsSeperator(i) + "; Enabled: " + MenuIsItemEnabled(Menugetitemid(i)) + "; Checked: " + MenuIsItemChecked(Menugetitemid(i)) + ";"
- Call hCloseDocument
-endcase
-