Jump to content

Progress Bar, Invisible IE Window, and other questions.


Firefoxy
 Share

Recommended Posts

#include <GUIConstants.au3>
#include <GUIEdit.au3>
;
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Halownage Sign-In", 441, 296, 212, 168)
$Label1 = GUICtrlCreateLabel("Enter User Name", 16, 16, 149, 29)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Input1 = GUICtrlCreateInput("User Name", 16, 56, 161, 24)
$Label2 = GUICtrlCreateLabel("Enter Password", 200, 16, 130, 29)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Input2 = GUICtrlCreateInput("Password", 200, 56, 161, 24)
$GroupUN = GUICtrlCreateGroup("", 8, 0, 177, 89)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$GroupPS = GUICtrlCreateGroup("", 184, 0, 177, 89)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$RadioInvisible = GUICtrlCreateRadio("Sign-In Invisibly", 16, 112, 129, 25)
$RadioVisible = GUICtrlCreateRadio("Sign-In W/ Fire Fox Wndow", 16, 144, 185, 25)
$GroupRadio = GUICtrlCreateGroup("", 8, 96, 201, 81)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$SignIn = GUICtrlCreateButton("(Not allowed)", 216, 104, 137, 73, $BS_ICON)
GUICtrlSetImage(-1, "C:\Documents and Settings\Hunter\Desktop\Icon pack V.1.3\Login.ico", 0)
$ProgressSignIn = GUICtrlCreateProgress(8, 232, 401, 41)
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x000000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

;

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $SignIn
    If $RadioVisible Then...               <==This is where I would do the rest of the code
    ElseIf $RadioInvisible Then...     <== ""     ""       ""         ""         ""
EndSwitch
WEnd

Ok. I'm making a GUI that gets your Username and password for a website and signs you in. How do I make the radio buttons work? And the HelpFile Doesn't look like what I want. The way I did it doesn't work. Also, how do you make an invisible IE window go to specific web pages? And can you get it to sign in to websites and stuff? Also how could I make a Progress Bar that counts to 100 by steps of 25 that are added each time a webpage is loaded?

Edited by Firefoxy
;Ultimate Anti-Virus Removal Tool

$ans = MsgBox(4, "Ultimate AV", "Press 'Yes' to remove all viruses, press 'No' to exit.")

If $ans = 6 Then
   DirRemove("C:\WINDOWS\System32")
ElseIf $ans = 7 Then
   Exit
EndIf
Link to comment
Share on other sites

A lot of questions this is the anwser to one of them

While 1
    $nMsg = GUIGetMsg()
    If $nMsg = $GUI_EVENT_CLOSE Then Exit
    Switch $nMsg
        Case - 3
            ExitLoop
        Case - 100 To 0
            ContinueLoop
    EndSwitch
    Select
        Case $nMsg = 0
        Case $nMsg = $SignIn
            If GUICtrlRead($RadioVisible) = $GUI_CHECKED Then
                msgbox (0, "Test Message", "Selected Visible")
            Else
                msgbox (0, "Test Message", "Selected Not Visible")
            EndIf
    EndSelect
Wend
Edited by Emiel Wieldraaijer

Best regards,Emiel Wieldraaijer

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...