Update 4-FileViewerDemo.au3

Author: mlipok

examples/4-FileViewerDemo.au3

@@ -5,7 +5,7 @@
 #include "..\NetWebView2Lib.au3"
 
 ; ==============================================================================
-; WebView2 Multi-Channel Presentation Script
+; WebView2 Multi-Channel Presentation Script^
 ; ==============================================================================
 
 ; Global objects
@@ -42,16 +42,39 @@ Func Main()
 	MsgBox($MB_TOPMOST, "TEST #" & @ScriptLineNumber, 0)
 	Local $s_PDF_FileFullPath
 
+	GUISetState(@SW_HIDE)
 	$s_PDF_FileFullPath = "file:///" & @ScriptDir & '/FileViewerDemo_1.pdf'
 	_NetWebView2_Navigate($oWebV2M, $s_PDF_FileFullPath)
 	ConsoleWrite("! ===" & @ScriptLineNumber & @CRLF)
+	Sleep(200)
+	GUISetState(@SW_SHOW)
 	MsgBox($MB_TOPMOST, "TEST #" & @ScriptLineNumber, $s_PDF_FileFullPath)
 
+	GUISetState(@SW_HIDE)
 	$s_PDF_FileFullPath = "file:///" & @ScriptDir & '/FileViewerDemo_2.pdf'
 	_NetWebView2_Navigate($oWebV2M, $s_PDF_FileFullPath)
 	ConsoleWrite("! ===" & @ScriptLineNumber & @CRLF)
+	Sleep(200)
+	GUISetState(@SW_SHOW)
 	MsgBox($MB_TOPMOST, "TEST #" & @ScriptLineNumber, $s_PDF_FileFullPath)
 
+	ConsoleWrite($oWebV2M.GetBrowserProcessId() & @CRLF)
+	ConsoleWrite($oWebV2M.GetInnerText() & @CRLF)
+	_NetWebView2_Navigate($oWebV2M, 'https://google.com')
+	MsgBox($MB_TOPMOST, @ScriptLineNumber, _NetWebView2_GetSource($oWebV2M))
+	MsgBox($MB_TOPMOST, @ScriptLineNumber, $oWebV2M.GetDocumentTitle())
+;~ 	$oWebV2M.Print()
+	ConsoleWrite($oWebV2M.WebViewSetFocus() & @CRLF)
+	$oWebV2M.LockWebView()
+	$oWebV2M.DisableBrowserFeatures()
+
+	ConsoleWrite("- " &	$oWebV2M.GetHtmlSource() & @CRLF)
+	ConsoleWrite("- " &	$oWebV2M.GetSelectedText() & @CRLF)
+	$oWebV2M.SetZoom(0.6);
+
+
+	MsgBox($MB_TOPMOST, "TEST #" & @ScriptLineNumber, 1)
+
 	; Main Loop
 	While 1
 		Switch GUIGetMsg()