[POMOC] poprawienie kodu

[tapne]

Witam, chciałem zrobić sobie prosty system logowania ale napotkałem parę błędów. Oto kod

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 199, 99, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 16, 16, 161, 21)
$Button1 = GUICtrlCreateButton("Button1", 16, 56, 161, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$login = GUICtrlRead($Input1)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
 Case $GUI_EVENT_CLOSE
  Exit
 Case $Button1
 $1 = FileReadLine("rejestr.ini", "2")
 $dlugosc = StringLen($1)
 $w=StringTrimLeft($1,13)
 MsgBox(0, "!", $w)
 If $login=$w Then
 MsgBox(0, "1", "Dobry login")
Else
 MsgBox(0, "1", "Zly login")
EndIf
EndSwitch
WEnd

 

plik rejestr.ini

[Login]
Uzytkownik11=tapne

 

i gdy w inpucie wpisze tapne to wyskakuje ze zły login, mógłby ktoś powiedzieć gdzie jest błąd ?

[C.J]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 225, 64, 192, 124)
$login = GUICtrlCreateInput("login", 8, 8, 209, 21)
$Button1 = GUICtrlCreateButton("Button1", 8, 32, 211, 25)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Local $var = IniRead("rejestr.ini", "Login", "Uzytkownik1", "NotFound")
If GUICtrlRead($login) = $var Then
MsgBox(0,"","Dobry login")
Else
MsgBox(0,"","Zły login")
EndIf

EndSwitch
WEnd

[tapne]

_{hm właśnie chodziło mi tylko o znalezienie błędu ponieważ plik rejestr ini ma wielu użytkowników a ty zrobiłeś na 1 ; )}

[xDeStRuCtx]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 199, 99, 192, 124)
$Input1 = GUICtrlCreateInput("Input1", 16, 16, 161, 21)
$Button1 = GUICtrlCreateButton("Button1", 16, 56, 161, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
 Case $GUI_EVENT_CLOSE
  Exit
 Case $Button1
   $login = GUICtrlRead($Input1)
 $1 = FileReadLine("rejestr.ini", "2")
 $dlugosc = StringLen($1)
 $w=StringTrimLeft($1,13)
 MsgBox(0, "!", $w)
 If $login==$w Then
 MsgBox(0, "1", "Dobry login")
Else
 MsgBox(0, "1", "Zly login")
EndIf
EndSwitch
WEnd

 

Odczytujesz inputa tylko przy odpaleniu programu, co jest błędem, bo $login zawsze = 0

[tapne]

nie zauważyłem ;] lajk i do zamknięcia