zugriff mit passwort verweigern

[VolXSturm|]

hallo, wie scripte ich es das bevor das programm gestartet wird eine inputbox kommt die nach dem passwort fragt & den zugriff verweigert wenn das pw falsch ist?
also angenommen das pw steht in einer .ini datei und das pw muss mit dem in der .ini datei übereinstimmen sonst schliesst sich das programm.
danke im vorraus

[omer36]

$input= InputBox("","","")
If IniRead("test.ini","sec.","key","") <> $input Then Exit

[VolXSturm|]

danke... und noch ne frage, kann ich mit koda zb per klick auf nen button ne neue "form" aufmachen lasse?
also das so mit einander verbinden das sich das 2. öffnet wenn ich auf den ersten klick.

[KDeluxe]

Mit Koda kannst du nur eine 2. GUI erstellen, mehr nicht. Du musst entweder mit dem erweiterten "GUIGetMsg" oder mit dem "GUIOnEvent" Modus arbeiten.
Hier mal ein kleines Beispiel für den GUIGetMsg Modus:

PHP Code:

$Form1 = GUICreate("Form1", 300, 300)
$Button1 = GUICtrlCreateButton("2. GUI öffnen", 0, 0, 300, 300)
$Form2 = GUICreate("Form2", 150, 150)
$Button2 = GUICtrlCreateButton("2. GUI schließen", 0, 0, 150, 150)
GUISetState(@SW_SHOW, $Form1)

While Sleep(10)
    $msg = GUIGetMsg(1)
    If $msg[1] == $Form1 Then
        If $msg[0] == -3 Then Exit
        If $msg[0] == $Button1 Then GUISetState(@SW_SHOW, $Form2)
    ElseIf $msg[1] == $Form2 Then
        If $msg[0] == -3 Or $msg[0] == $Button2 Then GUISetState(@SW_HIDE, $Form2)
    EndIf
WEnd 


Infos zu beiden Methoden findest du in der Hilfe.

[omer36]

so?

PHP Code:

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form= ;erste gui erstellt..
$Form1 = GUICreate("Form1", 625, 443, 192, 124)
$Button1 = GUICtrlCreateButton("2. gui öffnen", 8, 150, 80, 33, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
#Region ### START Koda GUI section ### Form= ;zweite gui erstellt...
$Form2 = GUICreate("andere gui", 574, 191, 210, 205)
$Button2 = GUICtrlCreateButton("schließen", 8, 72, 57, 33, $WS_GROUP)
GUISetState(@SW_HIDE)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[1]
        Case $Form1
            Switch $nMsg[0]
                Case $GUI_EVENT_CLOSE
                    Exit
                Case $Button1
                    GUISetState(@SW_SHOW, $Form2)
            EndSwitch
        Case $Form2
            Switch $nMsg[0]
                Case $GUI_EVENT_CLOSE
                    Exit
                Case $Button2
                    GUISetState(@SW_HIDE, $Form2)
            EndSwitch
    EndSwitch
WEnd 


[VolXSturm|]

***, danke