Sign in to follow this  
Followers 0
doohoodogg

introductory splash text

3 posts in this topic

Hy folks, i need a fix for this prb.

my script starts with a splashtext, but, i want the splash to close when i press the esc key, and the the script to continue. Currently the splash starts, and the script continues behind him, i dont want that.

heres the code:

SplashTextOn("PORT CREATOR by ROBERTO","Welcome." & @CRLF & @CRLF & "Port Creator este un programel facut de mine pentru prieteni si nu numai, cu scopul de a 'automatiza' crearea de porturi pentru programul P2P Azureus, porturi pe care unii nu stiu sau nu reusesc sa le faca, portul\rile fiind necesare pt o buna functionare a aplicatiei Azureus. " & @CRLF & "Acest program face porturile automat, tu trebuie doar sa specifici un nr pt port, si in cazul 2, IP-ul tau. " & @CRLF & "Este foarte important sa rulezi programul fara sa ai alte ferestre deschise, si este recomandat sa nu faci absolut nimic in timp ce programul creeaza porturile. (nu-ti fa griji, totul se termina in mai putin de 30 secunde)" & @CRLF & @CRLF & @CRLF & " With all respect," & @CRLF & " ROBERTO" & @CRLF & @CRLF & "Pentru a continua apasa ESC","-1","-1","-1","-1",0,"","","")

#EndRegion --- CodeWizard generated code End ---

;ALEGERE AVRIANTA

#include <GuiConstants.au3>

Opt("GUIOnEventMode", 1)

GuiCreate("ALEGERE VARIANTA", 392, 197,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$Label_1 = GuiCtrlCreateLabel("Alege o varianta !!" & @CRLF & "Varianta 1 este recomandata pentru inceput!! Dar in caz ca aceasta nu fuctioneaza, poti alege varianta 2. La varianta 2 va trebui sa specifici IP-ul tau.", 20, 9, 360, 40)

$Button_2 = GuiCtrlCreateButton("Varianta 1", 40, 80, 110, 30)

GuiCtrlSetOnEvent($Button_2, "var1")

$Button_3 = GuiCtrlCreateButton("Varianta 2", 240, 80, 110, 30)

GuiCtrlSetOnEvent($Button_3, "var2")

$Button_4 = GuiCtrlCreateButton("Exit", 130, 150, 130, 30)

thx folks

Share this post


Link to post
Share on other sites



Possibly just do a sleep of the length that the splash text stays on

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

yeah just do a simple sleep and how ever long

#include <GuiConstants.au3>
GuiCreate("ALEGERE VARIANTA", 392, 197,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
$Label_1 = GuiCtrlCreateLabel("Alege o varianta !!" & @CRLF & "Varianta 1 este recomandata pentru inceput!! Dar in caz ca aceasta nu fuctioneaza, poti alege varianta 2. La varianta 2 va trebui sa specifici IP-ul tau.", 20, 9, 360, 40)
$Button_2 = GuiCtrlCreateButton("Varianta 1", 40, 80, 110, 30)
$Button_3 = GuiCtrlCreateButton("Varianta 2", 240, 80, 110, 30)
$Button_4 = GuiCtrlCreateButton("Exit", 130, 150, 130, 30)
GUISetState()
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $Button_2
            SplashTextOn("PORT CREATOR by ROBERTO","Welcome." & @CRLF & @CRLF & "Port Creator este un programel facut de mine pentru prieteni si nu numai, cu scopul de a 'automatiza' crearea de porturi pentru programul P2P Azureus, porturi pe care unii nu stiu sau nu reusesc sa le faca, portul\rile fiind necesare pt o buna functionare a aplicatiei Azureus. " & @CRLF & "Acest program face porturile automat, tu trebuie doar sa specifici un nr pt port, si in cazul 2, IP-ul tau. " & @CRLF & "Este foarte important sa rulezi programul fara sa ai alte ferestre deschise, si este recomandat sa nu faci absolut nimic in timp ce programul creeaza porturile. (nu-ti fa griji, totul se termina in mai putin de 30 secunde)" & @CRLF & @CRLF & @CRLF & " With all respect," & @CRLF & " ROBERTO" & @CRLF & @CRLF & "Pentru a continua apasa ESC","-1","-1","-1","-1",0,"","","")
            Sleep(3000)
            SplashOff()
        Case $msg = $Button_4
            Exit
    EndSelect
WEnd
Edited by thatsgreat2345

Share this post


Link to post
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
Sign in to follow this  
Followers 0