Dim NumberOfGraphicModes as integer
Dim iCurrentGraphicsMode as integer
TestFile = ConvertPath (gTesttoolPath + "global\input\graf_inp\desp.bmp")
printlog "open application "
printlog "select graphic "
hUseAsyncSlot( "EditSelectAll" )
+ printlog "The Graphics Toolbar has to be visible now; If not -> ERROR "
+ ' workaround for i113609; there should have been a style selected without elements on creating the document - what failed; the elements should have been deleted before inserting the grafik in this test - which failed; so the workaround is to use <tab> to travel to the graphic selection here:
- printlog "The Graphics Toolbar has to be visible now; If not -> ERROR "
+ if ( not GraphicObjectbar.Exists( DEFAULT_DELAY ) ) Then
+ qaerrorlog "delete default content failed"
+ Kontext "GraphicObjectbar"
if ( GraphicObjectbar.Exists( DEFAULT_DELAY ) ) Then
Printlog "- graphic object toolbar exists"