testautomation/framework/required/includes/standard_toolbar_6.inc

   1 'encoding UTF-8  Do not remove or change this line!
   2 '**************************************************************************
   3 ' DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4 '
   5 ' Copyright 2000, 2010 Oracle and/or its affiliates.
   6 '
   7 ' OpenOffice.org - a multi-platform office productivity suite
   8 '
   9 ' This file is part of OpenOffice.org.
  10 '
  11 ' OpenOffice.org is free software: you can redistribute it and/or modify
  12 ' it under the terms of the GNU Lesser General Public License version 3
  13 ' only, as published by the Free Software Foundation.
  14 '
  15 ' OpenOffice.org is distributed in the hope that it will be useful,
  16 ' but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 ' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 ' GNU Lesser General Public License version 3 for more details
  19 ' (a copy is included in the LICENSE file that accompanied this code).
  20 '
  21 ' You should have received a copy of the GNU Lesser General Public License
  22 ' version 3 along with OpenOffice.org.  If not, see
  23 ' <http://www.openoffice.org/license.html>
  24 ' for a copy of the LGPLv3 License.
  25 '
  26 '/************************************************************************
  27 '*
  28 '* owner : gregor.hartmann@oracle.com
  29 '*
  30 '* short description : Open applications from New button on standardbar
  31 '*
  32 '\***************************************************************************
  33
  34 testcase tStandardBar_6
  35
  36     printlog( "Open applications from New button on standardbar" )
  37
  38
  39     hUseImpressAutopilot( false )
  40
  41     gApplication = "WRITER"
  42
  43     printlog "Check the 'New'-menu-button in Standardbar in each application"
  44     printlog "- click on menu-button -> open a new document as same document-type"
  45
  46     printlog "   - Writer"
  47     gApplication = "WRITER"
  48     hCreateDocument()
  49
  50     kontext "standardbar"
  51     Neu.Click()
  52
  53     kontext "documentwriter"
  54     DocumentWriter.TypeKeys( "Hallo" )
  55
  56     hDestroyDocument()
  57     hDestroyDocument()
  58
  59     printlog "   - Calc"
  60     gApplication = "CALC"
  61     hCreateDocument()
  62
  63     kontext "standardbar"
  64     Neu.Click()
  65
  66     kontext "documentcalc"
  67     DocumentCalc.TypeKeys( "Hallo" )
  68
  69     hDestroyDocument()
  70     hDestroyDocument()
  71
  72     printlog "   - Draw"
  73     gApplication = "DRAW"
  74     hCreateDocument()
  75
  76     kontext "standardbar"
  77     Neu.Click()
  78
  79     gMouseClick ( 50, 50 )
  80
  81     hDestroyDocument()
  82     hDestroyDocument()
  83
  84     printlog "   - Impress"
  85     gApplication = "IMPRESS"
  86     hCreateDocument()
  87
  88     kontext "standardbar"
  89     Neu.Click()
  90
  91     gMouseClick ( 50, 50 )
  92
  93     hDestroyDocument()
  94     hDestroyDocument()
  95
  96     printlog "   - HTML-document"
  97     gApplication = "HTML"
  98     hCreateDocument()
  99
 100     kontext "standardbar"
 101     Neu.Click()
 102
 103     kontext "documentwriter"
 104     DocumentWriter.TypeKeys( "Hallo" )
 105
 106     hDestroyDocument()
 107     hDestroyDocument()
 108
 109     printlog "   - Master-document"
 110     gApplication = "MASTERDOCUMENT"
 111     hCreateDocument()
 112
 113     kontext "standardbar"
 114     Neu.Click()
 115
 116     kontext "documentwriter"
 117     DocumentWriter.TypeKeys( "Hallo" )
 118
 119     kontext "Navigator"
 120     hCloseDialog( Navigator, "close,optional" )
 121     hDestroyDocument()
 122
 123     kontext "Navigator"
 124     hCloseDialog( Navigator, "close,optional" )
 125     hDestroyDocument()
 126
 127     printlog "   - Math"
 128     gApplication = "MATH"
 129     hCreateDocument()
 130
 131     kontext "standardbar"
 132     Neu.Click()
 133
 134     SchreibenInMathdok "a over b"
 135
 136     hDestroyDocument()
 137     hDestroyDocument()
 138
 139 endcase
 140
 141