Jump to content

Taskbar icon options?


Shyke
 Share

Recommended Posts

I know, the title wasn't exactly clear... lol.

I was wondering how to remove all items that you get when you right click the icon of your program and give you options like "Function1", "Function 2" and "function 3" and those, when clicked would launch websites?

anyway to do this?

Thanks in advance.

Link to comment
Share on other sites

I know, the title wasn't exactly clear... lol.

I was wondering how to remove all items that you get when you right click the icon of your program and give you options like "Function1", "Function 2" and "function 3" and those, when clicked would launch websites?

anyway to do this?

Thanks in advance.

The newest beta of AutoIt can do it, get it here:

http://www.autoitscript.com/autoit3/files/beta/autoit/

Here a little example:

#Include <Constants.au3>
#NoTrayIcon

Opt("TrayMenuMode",1)  ; Default tray menu items (Script Paused/Exit) will not be shown.

$prefsitem  = TrayCreateItem("Preferences")
TrayCreateItem("")
$aboutitem  = TrayCreateItem("About")
TrayCreateItem("")
$exititem   = TrayCreateItem("Exit")

TraySetState()

While 1
    $msg = TrayGetMsg()
    Select
        Case $msg = 0
            ContinueLoop
        Case $msg = $prefsitem
            Msgbox(64,"Preferences:","OS:" & @OSVersion)
        Case $msg = $aboutitem
            Msgbox(64,"About:","AutoIt3-Tray-sample")
        Case $msg = $exititem
            ExitLoop
    EndSelect
WEnd

Exit

Copied from the help file of the newest beta.

Its almostly like building a GUI, you can also use events:

#include <Constants.au3>
#NoTrayIcon

Opt("TrayOnEventMode",1)
Opt("TrayMenuMode",1)  ; Default tray menu items (Script Paused/Exit) will not be shown.

TraySetClick(16)   ; Only secondary mouse button will show the tray menu.

$infoitem = TrayCreateItem("Info")
TrayItemSetOnEvent(-1,"ShowInfo")

TrayCreateItem("")

$exititem = TrayCreateItem("Exit")
TrayItemSetOnEvent(-1,"ExitScript")

TraySetState()

While 1
    Sleep(10)  ; Idle loop
WEnd

Exit


; Functions
Func ShowInfo()
    Msgbox(0,"Info","Tray OnEvent Demo")
EndFunc


Func ExitScript()
    Exit
EndFunc

Hope it helps you ;) .

Sorry for my English, I'm Dutch... =DMedia UDFINet Adv UDF
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...