diff options
author | Oliver Craemer [oc] <oliver.craemer@oracle.com> | 2010-11-04 11:31:40 +0100 |
---|---|---|
committer | Oliver Craemer [oc] <oliver.craemer@oracle.com> | 2010-11-04 11:31:40 +0100 |
commit | c2278d802b274b0e8af94886851381a12d7ee198 (patch) | |
tree | 33ca612eef78f117242f092f12f1131ec2f6a82a /testautomation/dbaccess | |
parent | b43bd81cd15663a0cb843671564489df3e9f7f3e (diff) |
#i115353# MSC_SPECIAL_DIALOG does not work anymore
Diffstat (limited to 'testautomation/dbaccess')
-rw-r--r-- | testautomation/dbaccess/optional/includes/ctrl_Several2.inc | 4 | ||||
-rw-r--r-- | testautomation/dbaccess/optional/includes/ctrl_Wizards.inc | 8 |
2 files changed, 6 insertions, 6 deletions
diff --git a/testautomation/dbaccess/optional/includes/ctrl_Several2.inc b/testautomation/dbaccess/optional/includes/ctrl_Several2.inc index 82fa9229b1f8..717cf149b902 100644 --- a/testautomation/dbaccess/optional/includes/ctrl_Several2.inc +++ b/testautomation/dbaccess/optional/includes/ctrl_Several2.inc @@ -293,7 +293,7 @@ testcase tImageControl sleep(2) '/// set HelpURL printlog "set HelpURL" - fsetControlProperty("ImageControl","HelpURL","HID:1234567") + fsetControlProperty("ImageControl","HelpURL","customcontrol2") '/// save the document printlog "save the document" hFileSaveAsKill ( gOfficePath + ConvertPath("user/work/TT_ImageControl.odt")) @@ -315,7 +315,7 @@ testcase tImageControl Kontext "TabGeneralControl" dim bScrOK as boolean 'control variable if all properties are correct bScrOK = true - if fgetControlProperty("ImageControl","HelpURL") <> "HID:1234567" then + if fgetControlProperty("ImageControl","HelpURL") <> "customcontrol2" then warnlog "the imagecontrol is not saved with property: HelpURL" bScrOK = false endif diff --git a/testautomation/dbaccess/optional/includes/ctrl_Wizards.inc b/testautomation/dbaccess/optional/includes/ctrl_Wizards.inc index 49bcaceb6ac7..2f51183a40a1 100644 --- a/testautomation/dbaccess/optional/includes/ctrl_Wizards.inc +++ b/testautomation/dbaccess/optional/includes/ctrl_Wizards.inc @@ -239,7 +239,7 @@ testcase tGroupBoxWithDatasource Kontext "TabGeneralControl" TabGeneralControl.TypeKeys "<TAB>" , true 'this tab is importent, I don't not why but it is. sleep(1) - HelpURL.setText "HID:123456" + HelpURL.setText "customcontrol1" HelpURL.TypeKeys "<RETURN>",true sleep(1) Kontext "ControlPropertiesDialog" @@ -276,7 +276,7 @@ testcase tGroupBoxWithDatasource Kontext "TabGeneralControl" TabGeneralControl.TypeKeys "<TAB>" , true 'this tab is importent, I don't not why but it is. sleep(1) - HelpURL.setText "HID:1234567" + HelpURL.setText "customcontrol2" HelpURL.TypeKeys "<RETURN>", true sleep(1) Kontext "ControlPropertiesDialog" @@ -314,7 +314,7 @@ testcase tGroupBoxWithDatasource Kontext "TabGeneralControl" TabGeneralControl.TypeKeys "<TAB>" , true ' this tab is importent, I don't not why but it is. - HelpURL.setText "HID:12345678" + HelpURL.setText "customcontrol3" HelpURL.TypeKeys "<RETURN>", true sleep(1) Kontext "ControlPropertiesDialog" @@ -660,7 +660,7 @@ testcase tListBox warnlog "The dropdown style is not active." endif sleep(1) - fSetControlProperty("ListBox","HelpURL","HID:123456") + fSetControlProperty("ListBox","HelpURL","customcontrol1") sleep(1) '/// save the document printlog "save the document" |