Adding upstream version 1:7.0.4.upstream/1%7.0.4upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 48 insertions, 0 deletions

diff --git a/uitest/calc_tests/gridwin.py b/uitest/calc_tests/gridwin.py
new file mode 100644
index 000000000..7c9c87de0
--- /dev/null
+++ b/uitest/calc_tests/gridwin.py
@@ -0,0 +1,48 @@
+# -*- tab-width: 4; indent-tabs-mode: nil; py-indent-offset: 4 -*-
+#
+# This Source Code Form is subject to the terms of the Mozilla Public
+# License, v. 2.0. If a copy of the MPL was not distributed with this
+# file, You can obtain one at http://mozilla.org/MPL/2.0/.
+#
+
+from libreoffice.uno.propertyvalue import mkPropertyValues
+from uitest.uihelper.common import get_state_as_dict
+
+from uitest.framework import UITestCase
+
+class GridWinTest(UITestCase):
+
+    def test_select_object(self):
+
+        self.ui_test.create_doc_in_start_center("calc")
+        xCalcDoc = self.xUITest.getTopFocusWindow()
+        xGridWindow = xCalcDoc.getChild("grid_window")
+
+        selectProps = mkPropertyValues({"CELL": "B10"})
+        xGridWindow.executeAction("SELECT", selectProps)
+
+        xGridWindow.executeAction("SELECT", mkPropertyValues({"OBJECT": "Object 1"}))
+
+        xGridWindow.executeAction("ACTIVATE", tuple())
+
+        xGridWindow.executeAction("DESELECT", tuple())
+
+        self.ui_test.close_doc()
+
+    def test_select_sheet(self):
+
+        self.ui_test.create_doc_in_start_center("calc")
+        xCalcDoc = self.xUITest.getTopFocusWindow()
+        xGridWindow = xCalcDoc.getChild("grid_window")
+
+        for i in range(3):
+            self.ui_test.execute_dialog_through_command(".uno:Insert")
+            current_dialog = self.xUITest.getTopFocusWindow()
+
+            xOkButton = current_dialog.getChild("ok")
+            self.ui_test.close_dialog_through_button(xOkButton)
+
+        xGridWindow.executeAction("SELECT", mkPropertyValues({"TABLE": "2"}))
+        self.assertEqual(get_state_as_dict(xGridWindow)["SelectedTable"], "2")
+
+# vim: set shiftwidth=4 softtabstop=4 expandtab: