Solicitação de senha para de funcionar após um número de vezes Topic is solved

[DevWithCoffee]

Olá, muito obrigado pelo espaço aberto em português.
Eu não sou scripts de nenhum tipo de linguagem de programação, não sei se é esse o termo correto, eu entendo um pouco de alguns tipos, como VBScript, Javascript e PHP.
Comecei à usar o AHK por ser muito mais intuitivo que o VBScript, pelo menos visualmente.

Eu não entendo muito as metodologias, mas eu estava tentando criar um sistema que permitisse o uso de um programa especifico no computador do usuário através de senha.
Porém eu não travei a Gui com return, por que eu queria que a mesma fechasse após um tempo e após um número de tentativas.
O que acontece é que após algumas vezes que a Gui aparece (contei entre 9 e 10) ela para de funcionar e fica estática, não permitindo o envio da informação pra outra parte do código, independente se digitar a senha ou não, contei pelos Gui, Destroy.

Eu simplifiquei ao máximo que consegui, veja que o erro não acontecesse se existir o RETURN, mas o processo paralelo não vai acontercer.

Segue o código:

Code: Select all

#SingleInstance force
UsageTime = 0
ChkTry = 0

startGui:
Gui, New, -MinimizeBox +LastFound +Owner, Confirm:
Gui, Add, Text, x6 y8, Usage time: %UsageTime% seconds
Gui, Add, Button, w32 h22 x132 y8 +Default gChkPW, OK
Gui, Show, w172 h38 Center
;return ;If you want to stop the Loop

Loop
{
  ;======== Parallel process
  Sleep, 800
  UsageTime++
}

ChkPW:
Gui, Submit
ChkTry++
MsgBox, Number of executions: %ChkTry%

GuiClose:
GuiEscape:
Goto startGui

[garry]

um pequeno exemplo para 'password'

Code: Select all

Gui,2: -MinimizeBox +LastFound +Owner -dpiscale
I:=0
Gui,2: Add, Text,   x12   y10   , Login
Gui,2: Add, Edit,   x170  y10 w130  h30 -vscroll vLogin,%a_username%
Gui,2: Add, Text,   x12   y60   , Password
Gui,2: Add, Edit,   x170  y60 w130  h30 +Password vPass ,
Gui,2: Add, Button, x100  y100 w110 h30 default gA1 hidden, Enter
Gui,2: Show, w316 h160,TEST
GuiControl,2: Focus,Pass
return
;------------------
2Guiclose:
exitapp
;------------------
A1:
Gui,2:submit,nohide
if (pass="@lfa")
  {
  i:=0
  gosub,A2
  }
else
  {
  i++
  if (i=4)
    {
    msgbox,more then 3 wrong inputs for password`nQUIT
    exitapp
    }
  else
    msgbox, 262208,CHECK ,%i%-times WRONG password,1  
  }
return

A2:
msgbox,OK
return
;====================================

[DevWithCoffee]

Obrigado por responder.
Eu testei, mas parece não funcionar, as repetições não são contadas.

Eu editei o código por que escrevi as pressas ontem e nem testei, veja mais ou menos o que preciso é que a janela de solicitação de senha fecha após um tempo.
O problema é que quando não uso RETURN eu só consigo criar a Gui na tela umas 10 vezes, depois ela congela fica estática, não fecha não sai com "Escape key" e nem aceita o Submit.
Eu creio que seja algo no código base que impessa muitas repetições de Submit.

[garry]

exemplo com 'settimer'

Code: Select all

#warn
setworkingdir,%a_scriptdir%
startGui:
Gui, 1:new
Gui, 1: default
Gui, 1: -dpiscale -MinimizeBox
Gui, 1:Font,s11 , Lucida Console
UsageTime = 0
ChkTry    = 0
Gui, add, Text   , x10   y8 ,Usage time:
Gui, Add, Edit   , x190  y8 w80 h30 right vTimex,
Gui, Add, Button , x300  y8 w60  +Default gChkPW, OK
Gui, Show, w400 h100 Center,Confirm:
settimer,aas1,1000
return
;-----------------------
aas1:
UsageTime++
Guicontrol,1:,timex,%UsageTime%
return
;-----------------------
esc::exitapp    ;- escape to quit
;-----------------------
ChkPW:
Gui, Submit,nohide
ChkTry++
MsgBox, Number of executions: %ChkTry%
return
;-----------------------
GuiClose:
GuiEscape:
Goto startGui
;------------------------

[DevWithCoffee]

Parece que é isso mesmo garry.
Se na documentação mostra o return no exemplo do GUI, provavelmente é por que deve ser usado.
Fiz a repetição mais de 20 vezes e continua normal.

Muito obrigado pelo tempo que fosse se dispôs à me ajudar