Sign in to follow this  
Followers 0
iceberg

Splash Text

5 posts in this topic

#1 ·  Posted (edited)

Hi,

Can someone kindly help me to improve on the following code.

Thank you.

Edited by iceberg

mouse not found....scroll any mouse to continue.

Share this post


Link to post
Share on other sites



Hi,

Can someone kindly help me to improve on the following code.

Thank you.

<{POST_SNAPBACK}>

You can use ControlSetText to change the text without recreating the Window every time.

See SplashTextOn online help example here

Share this post


Link to post
Share on other sites

Im not sure if that made things better or worse lol, I think I may have another solution.

AutoItSetOption("TrayIconHide", 1)

$Dot = "."
$PleaseWait = "Please Wait ..."
$Verify = " Verifying Windows Version"
$Check = "  Checking for Network Connectivity "
$Done = " Done!"
$Font = "Comic Sans MS Bold"

SplashTextOn($PleaseWait, & @LF & $Verify, 350, 90, -1, -1, 5, "Comic Sans MS Bold", 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot , 350, 90, -1, -1, 5, "Comic Sans MS Bold", 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot, 350, 90, -1, -1, 5, "Comic Sans MS Bold", 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot, 350, 90, -1, -1, 5, "Comic Sans MS Bold", 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot & $Done, 350, 90, -1, -1, 5,$Font , 10)
Sleep(2000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot & $Done & @LF & @LF & $Check, 350, 90, -1, -1, 5, $Font, 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot & $Done & @LF & @LF & $Check & $Dot , 350, 90, -1, -1, 5, $Font, 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot & $Done & @LF & @LF & $Check & $Dot & $Dot, 350, 90, -1, -1, 5, $Font, 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot & $Done & @LF & @LF & $Check & $Dot & $Dot & $Dot, 350, 90, -1, -1, 5, $Font, 10)
Sleep(1000)
SplashTextOn($PleaseWait, & @LF & $Verify & $Dot & $Dot & $Dot & $Done & @LF & @LF & $Check & $Dot & $Dot & $Dot & $Done, 350, 90, -1, -1, 5, $Font, 10)
Sleep(2000)
SplashOff()

[u]Old Projects:[/u]A3MORGB2Hex[u]Old Functions:[/u]_TimeAdd/_TimeSub_AddComma_BubbleSort _RippleSort "He who does not understand your silence will probably not understand your words." - Elbert Hubbard.

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

Heres a better way

AutoItSetOption("TrayIconHide", 1)

$Dot = "."
$PleaseWait = "Please Wait ..."
$Verify = " Verifying Windows Version"
$Check = "  Checking for Network Connectivity "
$Done = " Done!"
$Font = "Comic Sans MS Bold"

$Text = @LF & $Verify

Do
   SplashTextOn($PleaseWait, $text, 350, 90, -1, -1, 5, $Font, 10)
   Sleep(1000)
   $Text = $Text & $Dot
Until $Text = @LF & $Verify & $Dot & $Dot & $Dot & $Dot

$Text = @LF & $Verify & $Dot & $Dot & $Dot

SplashTextOn($PleaseWait, $Text & $Done, 350, 90, -1, -1, 5,$Font , 10)
Sleep(2000)

Do 
   SplashTextOn($PleaseWait, $Text & $Done & @LF & @LF & $Check, 350, 90, -1, -1, 5, $Font, 10)
   Sleep(1000)
   $Check = $Check & $Dot
Until $Check = "    Checking for Network Connectivity ...."

$Check = "  Checking for Network Connectivity ..."

SplashTextOn($PleaseWait, $Text & $Done & @LF & @LF & $Check & $Done, 350, 90, -1, -1, 5, $Font, 10)
Sleep(2000)

SplashOff()
Edited by burrup

[u]Old Projects:[/u]A3MORGB2Hex[u]Old Functions:[/u]_TimeAdd/_TimeSub_AddComma_BubbleSort _RippleSort "He who does not understand your silence will probably not understand your words." - Elbert Hubbard.

Share this post


Link to post
Share on other sites

hi,

thanks for all the replies.


mouse not found....scroll any mouse to continue.

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