summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorsj <sj@openoffice.org>2010-09-15 12:51:25 +0200
committersj <sj@openoffice.org>2010-09-15 12:51:25 +0200
commit18336e859d81a2c97785e6c9af9b140831e23b28 (patch)
tree4ceb7c1c32c3a32b4f7e1dc0353984e3cc8088fb
parentd848388c48df077afcbb056beaa3549ac9258650 (diff)
impress186: #i114271#, [Automation] Adapt export tests to new dialog
-rw-r--r--testautomation/graphics/required/includes/global/id_opt_2.inc33
1 files changed, 0 insertions, 33 deletions
diff --git a/testautomation/graphics/required/includes/global/id_opt_2.inc b/testautomation/graphics/required/includes/global/id_opt_2.inc
index b959b718582c..8d38b2b9dc92 100644
--- a/testautomation/graphics/required/includes/global/id_opt_2.inc
+++ b/testautomation/graphics/required/includes/global/id_opt_2.inc
@@ -64,39 +64,6 @@ testcase tToolsOptionsMeasurementUnit (sApplication as string)
Kontext "ExtrasOptionenDlg"
ExtrasOptionenDlg.OK
- FileExport
- Kontext "ExportierenDlg"
- Dateiname.SetText "adagio"
- Dateityp.Select "BMP - Windows Bitmap (.bmp)"
- if AutomatischeDateinamenserweiterung.Exists then
- AutomatischeDateinamenserweiterung.Check
- else
- warnlog( "Automatic Filename Extension checkbox is mising" )
- endif
- Speichern.Click
- kontext "AlienWarning"
- if AlienWarning.exists(5) then
- warnlog "#i41983# Alien Warning on export not allowed"
- AlienWarning.OK
- endif
- Kontext "Messagebox"
- if Messagebox.Exists(2) then
- Messagebox.Yes
- endif
- Sleep 3
- Kontext "BMPOptionen"
- Groesse.Check
- sUnitDialog = getMeasUnit(Breite.getText) ' (2)
- if (getMeasUnit(Hoehe.getText) <> sUnitDialog) then
- warnlog " Measurement Unit is different for Width:'" + sUnitDialog + "' and Hight:'" + getMeasUnit(Hoehe.getText) + "'"
- else
- printlog "Measurement Unit is same for Width:'" + sUnitDialog + "' and Hight:'" + getMeasUnit(Hoehe.getText) + "'"
- endif
- if (sUnitOptions <> sUnitDialog) then
- printlog "#109705# Measurement Unit is different for Options:'" + sUnitOptions + "' and BMP Dialog:'" + sUnitDialog + "' (1) <> (2)"
- endif
- BMPOptionen.Cancel
-
Format3D_Effects
Kontext "Drei_D_Effekte"
Geometrie.Click