Splash Text

[iceberg]

Hi,

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

Thank you.

Edited April 4, 2005 by iceberg

[SumTingWong]

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

[buzz44]

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()

[buzz44]

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 April 4, 2005 by burrup

[iceberg]

hi,

thanks for all the replies.