Commits

jsk  committed 5a1d104

jl146: #i107038 - Added call to ViewZoom at the end of hNewDocument() for Writer documents

  • Participants
  • Parent commits 9a44e8a

Comments (0)

Files changed (1)

File testautomation/global/tools/includes/required/t_doc1.inc

     case else             : WarnLog "hNewDocument: No Applikation named '" + gApplication + "' exists in this routine!"
     end select
     Sleep 2
+
+    ' #i107038: This code forces the writer to display one page only which is
+    ' zoomed to pagewidth, filling the entire - previously maximized - window.
+    ' This is required because the VCL Testtool might eventually draw objects 
+    ' outside the document window.
+    if ( gApplication = "WRITER" ) then
+        ViewZoom "Zoom.Value", 0, "Zoom.ValueSet", 28703, "Zoom.Type", 3
+    endif
+    
 end sub
 '
 '-------------------------------------------------------------------------------