;-- TIME_STAMP   2020-11-19 16:13:50   v 0.1


;~ Eine reine html-Datei kann man natürlich mit:
;~ 		ShellExecute($gc_PathBrowser, @ScriptDir & "\meineDatei.htm")
;~ ausführen. Jedoch dann mit Titel und Icon des Browserfensters.

Opt('MustDeclareVars', 1)

#include "OperaEmbedded.au3"

Global $ghMain, $gbtHelpRun
Global $ghHelp, $gbtHelpClose

; --- main ---
$ghMain = GUICreate('Main Window')
$gbtHelpRun = GUICtrlCreateButton('Show Help', 20, 40, 120, 25)
; -- /main ---


; --- help ---
$ghHelp = GUICreate('Opera Embedded', 800, 600)
$gbtHelpClose = GUICtrlCreateButton('Close', 710, 570, 80, 20)

; Embedded Opera Window (mit Border - flag:True, funktioniert nicht immer)
_OperaEmbedded_Create($ghHelp, 10, 10, -20, -50, True) ; negative Breite/Höhe: Differenz zum Parent-Fenster Breite/Höhe

; Da die html-Datei im TMP erstellt wird, muss der Pfad zum Font im ScriptDir noch umgeroutet werden
Local $aRepl[1][2] = [["url('fonts/sourcecode_pro/", "url('" & StringReplace(@ScriptDir, '\', '/') & "/fonts/sourcecode_pro/"]]
_OperaEmbedded_HtmlFromFile(@ScriptDir & "\array_tut.htm", $aRepl) ; Originaldatei wird nicht verändert durch Replace
; -- /help ---

GUISetState(@SW_SHOW, $ghMain)

Global $aMsg
While True
	$aMsg = GUIGetMsg(1)
	Switch $aMsg[0] ; ID
		Case -3
			If $aMsg[1] = $ghMain Then
				Exit
			Else
				GUISetState(@SW_HIDE, $ghHelp)
			EndIf
		Case $gbtHelpRun
			_OperaEmbedded_RefreshView()  ; zeigt die html-Datei im Embedded Window an
			GUISetState(@SW_SHOW, $ghHelp)
		Case $gbtHelpClose
			GUISetState(@SW_HIDE, $ghHelp)
	EndSwitch
WEnd