Unresponsive GUI

[ajit]

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>


_IEErrorHandlerRegister ()

$oIE = _IECreateEmbedded ()
GUICreate("Embedded Web control Test", 640, 580, _
        (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _
        $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)
$GUIActiveX = GUICtrlCreateObj($oIE, 20, 10, 600, 500)
$GUI_Button_browse = GUICtrlCreateButton("Browse", 430, 540, 100, 30)

GUISetState()       ;Show GUI

; Waiting for user to close the window
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $GUI_Button_browse
            $pdf_file = FileOpenDialog("123", @ScriptDir & "\", "Pdf files (*.pdf)", 1)
            _IENavigate ($oIE, $pdf_file )
    EndSelect
WEnd

GUIDelete()

Exit

HI:

I have a GUI, directly taken from help file, which I modified to open pdf files.

The opening of pdf file is fine, but after that the GUI becomes unresponsive, does not close with $GUI_EVENT_CLOSE.

Please help me out.

Ajit

Edited February 18, 2010 by ajit

[Melba23]

ajit,

Works for me if I force the immediate return of _IENavigate:

_IENavigate ($oIE, $pdf_file, 0)

M23

[ajit]

@Melba23

Thanks for your guidance.

_IENavigate ($oIE, $pdf_file, 0) did the trick.

Thanks again

Regards

Ajit

[whim]

@ajit

In the code in post 1, your GUIDelete() is 'dead code', because

of the Exit in the While..Wend loop.

You could either change Exit -> ExitLoop, or remove GUIDelete()

HTH,

wim

[ajit]

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <TabConstants.au3>


_IEErrorHandlerRegister ()

$oIE = _IECreateEmbedded ()
GUICreate("Embedded Web control Test", 640, 580, _
        (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _
        $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)

$GUI_Button_browse = GUICtrlCreateButton("Browse", 430, 530, 100, 30)

$tabs = GUICtrlCreateTab(10, 10, 600, 500, $TCS_FIXEDWIDTH)
GUICtrlSetResizing($tabs, $GUI_DOCKRIGHT + $GUI_DOCKTOP)

$PDF_TAB = GUICtrlCreateTabItem("TAB1")

$GUIActiveX = GUICtrlCreateObj($oIE, 30, 50, 480, 380)


GUISetState()       ;Show GUI

; Waiting for user to close the window
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $GUI_Button_browse
            $pdf_file = FileOpenDialog("123", @ScriptDir & "\", "Pdf files (*.pdf)", 1)
            _IENavigate ($oIE, $pdf_file, 0 )
    EndSelect
WEnd

I am sorry to come again with the same topic.

The script worked fine until I used it in a GUI with tab control. The problem here is a little different, the adobe reader gets stuck when I try to scroll the pages. I think it is due to my wrong coding but cannot help myself.

Please help me.

Ajit

[ajit]

Please help me with this

Ajit