diff options
Diffstat (limited to 'qadevOOo/tests/basic/ifc/chart/LineDiagram/chart_LineDiagram.xba')
-rw-r--r-- | qadevOOo/tests/basic/ifc/chart/LineDiagram/chart_LineDiagram.xba | 107 |
1 files changed, 0 insertions, 107 deletions
diff --git a/qadevOOo/tests/basic/ifc/chart/LineDiagram/chart_LineDiagram.xba b/qadevOOo/tests/basic/ifc/chart/LineDiagram/chart_LineDiagram.xba deleted file mode 100644 index 7de157b35aec..000000000000 --- a/qadevOOo/tests/basic/ifc/chart/LineDiagram/chart_LineDiagram.xba +++ /dev/null @@ -1,107 +0,0 @@ -<?xml version="1.0" encoding="UTF-8"?> -<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd"> -<script:module xmlns:script="http://openoffice.org/2000/script" script:name="chart_LineDiagram" script:language="StarBasic"> - - -'************************************************************************* -' -' 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. -' -'************************************************************************* -'************************************************************************* - - - -' Be sure that all variables are dimensioned: -option explicit - -'************************************************************************* -' This Interface/Service test depends on the following GLOBAL variables, -' which must be specified in the object creation: - -' Global oLineDiagram As Object - -'************************************************************************* - - - - - - -Sub RunTest() - -'************************************************************************* -' SERVICE: -' com.sun.star.chart.LineDiagram -'************************************************************************* -On Error Goto ErrHndl - Dim oObject As Object - ' Change an object to test here! - oObject = oObj - oObj = oLineDiagram - - if isEmpty(oObj) then - Out.Log("Global oLineDiagram As Object is required for this test!") - End If - - Dim nSymbolType(1) As Integer - nSymbolType(0) = com.sun.star.chart.ChartSymbolType.NONE - nSymbolType(1) = com.sun.star.chart.ChartSymbolType.AUTO - PropertyTester.TestProperty("SymbolType", nSymbolType()) - - oObj.SymbolType = com.sun.star.chart.ChartSymbolType.SYMBOL0 - Dim newSize As new com.sun.star.awt.Size - newSize.Width = 300 - newSize.Height = 300 - PropertyTester.TestProperty("SymbolSize", Array(newSize)) - - Test.StartMethod("SymbolBitmapURL") - Dim sURL1 As String - Dim sURL2 As String - oObj.setPropertyValue("SymbolBitmapURL", utils.Path2URL(cTestDocsDir) + "crazy-blue.jpg") - sURL1 = oObj.getPropertyValue("SymbolBitmapURL") - oObj.setPropertyValue("SymbolBitmapURL", utils.Path2URL(cTestDocsDir) + "space-metal.jpg") - sURL2 = oObj.getPropertyValue("SymbolBitmapURL") - Test.MethodTested("SymbolBitmapURL", sURL1 <> sURL2) - - PropertyTester.TestProperty("Lines") - - Dim nSpline(1) As Long - nSpline(0) = 0 - nSpline(1) = 2 - PropertyTester.TestProperty("SplineType", nSpline()) - - PropertyTester.TestProperty("SplineOrder") - - PropertyTester.TestProperty("SplineResolution") - - ' Change an object back! - oObj = oObject - -Exit Sub -ErrHndl: - Test.Exception() - resume next -End Sub -</script:module> |