Disable GUI when a file exist

[mabriseb 0]

I would like to freeze my GUI for the time that a file exist and when the file has been deleted the GUI is enable again. I tried the script below but it's not working

$sortie = 0

GUISetState (@SW_DISABLE)

Do

$test = FileExists(@ScriptDir & "\List\1.txt")

If $Test = 1 Then

Else

$Sortie = 1

EndIf

until $Sortie = 0

GUISetState (@SW_ENABLE)

[buzz44 1]

While FileExists(@ScriptDir & "\List\1.txt")
   GUISetState (@SW_DISABLE)
Wend

GUISetState (@SW_ENABLE)

[LxP 2]

If you find that the above code makes your CPU crazy (I haven't tried it but it looks like it may) then you may prefer this code:

guiSetState(@SW_DISABLE)

while (fileExists(@scriptDir & "\list\1.txt"))
    sleep(250)
wEnd

guiSetState(@SW_ENABLE)

[buzz44 1]

Yeah I was thinking that LxP , I was going to consider changing it to what you have above or something like below, but your's seems to be less complicated.

$Temp = 0

While FileExists(@ScriptDir & "\List\1.txt")
   If $Temp = 0 Then GUISetState (@SW_DISABLE)
   $Temp = 1
Wend

GUISetState (@SW_ENABLE)

Edited July 12, 2005 by Burrup

[mabriseb 0]

Thanks!!! It's working without put the sleep command but maybe I will use it on my old computer where this script will be use