Jump to content

traymenu response experimenting


Recommended Posts

#Include <Constants.au3>
#NoTrayIcon
Opt("TrayAutoPause", 0)
Opt("TrayMenuMode",1)

$aboutitem  = TrayCreateItem("&About")
TrayCreateItem("")
$exititem   = TrayCreateItem("Abort / E&xit")

TraySetState()

While 1
    $msg = TrayGetMsg()
    Select
        Case $msg = 0
            ContinueLoop
        Case $msg = $aboutitem
            Msgbox(64,"About:","pron is da shizzle v 0.5")
        Case $msg = $exititem
            ExitLoop
    EndSelect
WEnd
TrayTip("AIU", "Starting Download...", 5, 1)
$size = InetGetSize('ftp://ftp.pron.com/boobies.exe')
InetGet("ftp://ftp.pron.com/boobies.exe", "test.txt", 0, 1)
Sleep(2000)
While @InetGetActive = 1
TrayTip("clears any tray tip","",0)
TrayTip("Automatic pron downloader", "Downloading... " & Int(@InetGetBytesRead / $size * 100) & "%", 5, 1)
Sleep(1000)
WEnd
TrayTip("AIU", "Download Complete.", 5, 1)
Sleep(2000)
TrayTip("clears traytip","",0)
TrayTip("AIU", "Applying update.", 5, 1)
Sleep(2000)
TrayTip("clears traytip","",0)
TrayTip("AIU", "Update Complete!", 5, 1)

Exit

I'm not sure how to make the menu respond while the download is occuring. Could somebody please point out my stupidity? Thanks!

This signature is computer generated, nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#.......

Link to comment
Share on other sites

I'm not sure what you are trying to do .... But bear in mind that the download starts only if you choose $exitItem.... Otherwise it will be in the loop until ExitLoop.... And if you press the Exit again then the download will restart....Specify what you are trying to do and we'll try to help you....

Link to comment
Share on other sites

I'm trying to make the menu respond during the entire time so you can abort the download or rest of the steps at any time by choosing abort. The way it works now is it downloads and quits but the menu doesn't respond.

This signature is computer generated, nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#nothing can go wron#.......

Link to comment
Share on other sites

When you are inside a loop e.g. While @InetGetActive (BTW = 1 is not needed) then the program is trapped inside the loop and TrayGetMsg() doesnt work until it exits the loop.... So you have to deal with the AdLib Function.... Read in the help file for AdLibEnable() and AdLibDisable()....

C ya

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...