Problem with infinity looping GUI

[matys]

Hello i am making a script. The main problem is that script is looping when process is found. I want that script open only 1 GUI when process it's recognized.

Here is script:

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

while 1
If ProcessExists("notepad.exe") Then ; Check if the Notepad process is running.

gui1()

Func gui1()
while 1
$oIE = ObjCreate("Shell.Explorer.2")

    ; Create a simple GUI for our output
    GUICreate("Embedded Web control Test", 640, 580, (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN))
    GUICtrlCreateObj($oIE, 10, 40, 600, 360)

    GUISetState(@SW_SHOW) ;Show GUI

    $oIE.navigate("http://www.autoitscript.com")
 WEnd
EndFunc   ;==>gui

Else
    sleep(10000)
endif
WEnd

Thanks for help! 

[FireFox]

Remove the loop wrapping your GUI... and add e.g a flag to be toggled when the process is found / not found.

Edited March 25, 2014 by FireFox

[water]

What is While/WEnd infunction gui1 for?

[matys]

That's nothing i was testing something. How you mean flag to be toggled? Im new in autoit ..

Program must all the time check if process exist if not do nothing, if exist than open GUI.

Thanks for answers

[FireFox]

I didn't see your func is inside the loop. Read the helpfile with its examples and you will see how things work : it's outside everything.

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

Local $fExists = False

While 1
    If ProcessExists("notepad.exe") Then ; Check if the Notepad process is running.
        If Not $fExists Then
            $fExists = True
            gui1()
        EndIf
    ElseIf $fExists Then
        $fExists = False
        Sleep(100)
    EndIf
WEnd

Func gui1()
    $oIE = ObjCreate("Shell.Explorer.2")

    ; Create a simple GUI for our output
    GUICreate("Embedded Web control Test", 640, 580, (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN))
    GUICtrlCreateObj($oIE, 10, 40, 600, 360)

    GUISetState(@SW_SHOW) ;Show GUI

    $oIE.navigate("http://www.autoitscript.com")
EndFunc   ;==>gui1

Br, FireFox. Edited March 25, 2014 by FireFox

[matys]

I tryed your script but it's doing same as before. Looping when notepad process is detected.

Please help me!

[FireFox]

Okay little mistake, post edited.

[matys]

I tested it on 2 computers right now, on windows 7 and 8. 

On both i get loop when notepad is opened.

How is that possible that u don't get it ?

Thanks for answer

[FireFox]

Be sure you have the script I edited.

[matys]

Oh i didn't saw that you edited your code!

I wanna ask why i can't close window "Embedded Web control Test" with "Exit" at top right corner of window?

Thanks

[FireFox]

It's not magic, you need to tell the GUI you want the script to Exit when you click on the close button.

Look at the helpfile please (GUICreate).

Edited March 25, 2014 by FireFox