Default IconObj in SysTrayItem
1 post
• Page 1 of 1
Default IconObj in SysTrayItem
I am creating a Popup SystemTrayItem using
Windows-64 17.0.33755.0 W Development
under Windows 7 and Windows 10 with the following code
This code works except that the "standard Dyalog APL icon" is invisible/transparent!
You can click on the location in the system tray where the icon should appear (even though you cannot see it) and the Popup window appears.
Have I done something wrong? Do I need to specify the IconObj explicitly?
Thanks
Windows-64 17.0.33755.0 W Development
under Windows 7 and Windows 10 with the following code
- Code: Select all
Popup arg
⍝ Monitor for "Request to close" via ⎕DQ in system tray icon
⎕TNAME←'PopUp'
'#.Tray'⎕WC'SysTrayItem'('Tip' 'ANTS is running')('Popup' 'Tray.m')
'#.Tray.m'⎕WC'Menu'
'#.Tray.m.s'⎕WC'MenuItem' 'QUIT'('Event' 'Select' '#.Quit')
'#.Tray.m.sep2'⎕WC'Separator'
'#.Tray.m.about'⎕WC'MenuItem' 'About Dyalog'('Event' 'Select' '[About]')
:While 1<⍴⎕TNUMS
#.Tray.Wait
:End
- Code: Select all
Quit;res
res←'Q'#.DLLS.Win_msg' Are you sure you want to exit Ants?'
:If res≡1
⎕FUNTIE ⎕FNUMS
⎕TKILL ⎕TNUMS~⎕TID
⎕NUNTIE ⎕NNUMS
'Killed'
→
:End
The SysTrayItem object appears as an icon in the Windows System Tray.
....
The IconObj property specifies the name of an Icon object used to display the SysTrayItem. If not specified, the default is the standard Dyalog APL icon.
This code works except that the "standard Dyalog APL icon" is invisible/transparent!
You can click on the location in the system tray where the icon should appear (even though you cannot see it) and the Popup window appears.
Have I done something wrong? Do I need to specify the IconObj explicitly?
Thanks
Ray Cannon
Please excuse any smelling pisstakes.
Please excuse any smelling pisstakes.
-
ray - Posts: 237
- Joined: Wed Feb 24, 2010 12:24 am
- Location: Blackwater, Camberley. UK
1 post
• Page 1 of 1
Return to Windows: GUI, COM/OLE/ActiveX
Who is online
Users browsing this forum: No registered users and 1 guest
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group