strepsirrhini/office-gobmx
9
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

automationdev300m87: #i112208# - Moved static filename into a variable, handled Picture dialog

Browse source
This commit is contained in:
Joerg Skottke [jsk] 2010-09-15 14:23:25 +02:00
parent 9e7c84f288
commit 03767ada71
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
testautomation/writer/optional/includes/insertgraphic/w_insertgraphic1.inc
View file

@ -520,8 +520,10 @@ endcase
testcase tInsertGraphic_10
Dim sTestFile as String
dim sOutFile as string
sTestFile = ConvertPath(gOfficepath + "user\work\tInsertGraphic_5.sxw")
sOutFile = gOfficepath + "user\work\tInsertGraphic_5.odt"
PrintLog "- Insert linked graphics and break the links via Menu Edit - Link"
'/// Insert linked graphics and break the links via Menu Edit - Link
@ -636,13 +638,13 @@ testcase tInsertGraphic_10
PrintLog "- Save and Reload the file"
'/// Save the file and close the file
Call hFileSaveAsWithFilterKill(gOfficepath + "user\work\tInsertGraphic_5.odt", "writer8")
Call hFileSaveAsWithFilterKill( sOutFile, "writer8")
sleep(2)
Call hCloseDocument
sleep(2)
'/// Reload the file
hFileOpen( gOfficepath & "user\work\tInsertGraphic_5.odt")
hFileOpen( sOutFile )
sleep(2)
@ -652,6 +654,10 @@ testcase tInsertGraphic_10
sleep(1)
if fFormatGraphic("TabZusaetze") = false then
Warnlog "#i46300#linked JPEG pictures will disappear when doc is modified."
kontext "TabZusatze"
if ( TabZusaetze.exists() ) then TabZusaetze.close()
kontext "DocumentWriter"
Call hCloseDocument
goto endsub
end if