ControlClick on a Win7 tray icon sub-menu doesn't work - (Moved)
-
Similar Content
-
By MONaH-Rasta
Opt('TrayAutoPause', 0) $iTray1 = TrayCreateItem('Tray 1') TrayItemSetState(-1, 1) TrayCreateItem('') $iTrayMenu1 = TrayCreateMenu('Tray Menu 1') $iTray2 = TrayCreateItem('Tray 2', $iTrayMenu1, -1, 1) TrayItemSetState(-1, 1) $iTray3 = TrayCreateItem('Tray 3', $iTrayMenu1, -1, 1) $iTray4 = TrayCreateItem('Tray 4', $iTrayMenu1, -1, 1) TrayCreateItem('') $iTrayMenu2= TrayCreateMenu('Tray Menu 2') $iTray5 = TrayCreateItem('Tray 5', $iTrayMenu2, -1, 1) TrayItemSetState(-1, 1) $iTray6 = TrayCreateItem('Tray 6', $iTrayMenu2, -1, 1) $iTray7 = TrayCreateItem('Tray 7', $iTrayMenu2, -1, 1) TrayCreateItem('') $iTray8 = TrayCreateItem('Tray 8') $iTray9 = TrayCreateItem('Tray 9') $iTray10 = TrayCreateItem('Tray 10') TrayItemSetState(-1, 1) While True Sleep(1000*5) WEnd When I click on Tray 3 / Tray 4 / Tray 6 / Tray 7 nothing happens. Only Tray 2 and Tray 5 stay checked.
I have tried setting
Opt("TrayMenuMode", 8) In this case radio menuitems act like normal menuitems only looks different.
I'm using AutoIt v3.3.14.5.
Tested on Windows 10 LTSC 2019 (1809) x64 version: 10.0.17763 build 17763.475 and Windows Server 2008 R2.
Tried run script x64 and x86 same result.
Is this kind a bug or something?
-
By ur
I need to read the status of OneDrive icon running in the taskbar and update the status in a log file.
2nd part I can complete
But the first part, how to read the status of tray menu icon.
I need the text above from the tray icon.
I looked into , but not that helpful.
-
By AutoitMike
I saw a post dated 2013 about WinSetTitle not working in Win7 64bit. No answer there for me.
I am trying to set the title of a window, the function returns success and the title is changed for about 50 ms and then reverts back to its original value.
#RequireAdmin makes no difference in operation.
I have tried using the handle, the title and the class to define the window. Operation is the same for all three ways.
EG:
WinSetTitle("Old Title", "", "New Title")
WinSetTitle("[Class:Class name]","","New Title")
WinSetTitle(handle,"","New Title")
;=======================================================================================
All functions report success.
WinActivate("PxxCXpbHG", "Text")
WinSetTitle("PxxCXpbHG ", "Text","New title")
$M1=WinGetTitle("[ACTIVE]","")
sleep (100)
$M2=WinGetTitle("[ACTIVE]","")
MsgBox(0,"", $M1 & " " & $M2) ;------------------> "New Title" "PxxCXpbHG"
If I change Sleep to 50 , then it is "New Title", "New Title" so somewhere between 50 and 100 ms it gets changed back,but by what??
Thanks for any help in this matter.
-
By imitto
Hello all!
I was in read-only until today, started to use Autoit 3 weeks ago. It can really make things easy, I really love it
I have some script now that works and make our job effective, but I have problems with the latest. It works if I open the script's folder and run the exe directly. If I use the shortcut that I created on the desktop, it's not working properly. Activates the window, but not opening/exporting my files, just opens the last msgbox. I use ftp becouse the PC and the destination PC is not on the same network.
Here's the script:
#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=..\microsoft_excel.ico #AutoIt3Wrapper_Res_Comment=send file over ftp #AutoIt3Wrapper_Res_Description=send file over ftp for process #AutoIt3Wrapper_Res_Language=1038 #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.14.2 Author: imitto Script Function: Rename and put playlist file on ftp #ce ---------------------------------------------------------------------------- #RequireAdmin #include <File.au3> #include <FileConstants.au3> #include <AutoItConstants.au3> #include <MsgBoxConstants.au3> #include <FTPEx.au3> ; Script Start Global $playlistname=@YEAR&@MON&@MDAY&"-playlist.pll" BlockInput($BI_DISABLE) Opt ("WinTitleMatchMode", 2) WinActivate("MAIN SCHED") WinWaitActive("MAIN SCHED") ;Opt ("WinTitleMatchMode", 1) Send("!fo") WinWaitActive("Open") Send("Z:\playlist\"&$playlistname&"{ENTER}") Sleep(2000) Send("!fe") WinWaitActive("MCon") Send("{ENTER}") WinWaitActive("Save") Send("C:\sendFileForXLS\lista.txt{ENTER}") Sleep(500) Send("!fc") BlockInput($BI_ENABLE) Sleep(50) Opt ("WinTitleMatchMode", 1) Local $hOpen = _FTP_Open('MyFTP Control') $ftp=_FTP_Connect($hOpen, "**********", "******", "******") If @error Then MsgBox($MB_SYSTEMMODAL, '_FTP_Connect', 'ERROR=' & @error) Else _FTP_FilePut($ftp, @ScriptDir&"\lista.txt", "/lista.txt") EndIf Local $iFtpc = _FTP_Close($hOpen) FileDelete(@ScriptDir&"\lista.txt") MsgBox(0, "", "Playlist exported", 2) Exit
-
By lgvlgv
I have a problem with changeing the trayicon while program is running, is it possible?
my script seems to be running for a while then it becomes unresponcive
I have a script thats sets the tray icon to a "red icon" when i lose ping connection, then when ping resumes it sets it back to green icon.
But for some reason the script gets unresponsive and nothing happens, there are no errors just have to kill the trayicon the hardway.
Some times it can run for hours before it starts to "hang" again.
$nTrayIcon1 = _TrayIconCreate("Datornamn: " & @ComputerName & @CRLF & "IPAdress: " & @IPAddress1 & " ," & @IPAddress2, @ScriptFullPath, -1)
Local $iPing = Ping($LatencyUrl, $LatencyMS) If @error Then If @error = 1 Then _DebugOut("---------- (_Ping Start)-----------") _TrayIconSetIcon($nTrayIcon1, @ScriptFullPath, -5) _TrayIconSetToolTip($nTrayIcon1, "Datornamn: " & @ComputerName & @CRLF & "IPAdress: " & @IPAddress1 & " ," & @IPAddress2 & @CRLF & "Gateway: " & _GetGatewayIP() & @CRLF & " Internet error: " & @error & ", Host is offline.") ; _TrayTip($nTrayIcon1, "Lost Connection", "Error: " & @error & " Host is offline.", $nTimeOut = 3, $nInfoFlags = 0) _DebugOut("*PING: " & @error & ", Host is offline") _DebugOut("---------- (_Ping End)-----------" & @CRLF) ElseIf @error = 2 Then _DebugOut("---------- (_Ping Start)-----------") _TrayIconSetIcon($nTrayIcon1, @ScriptFullPath, -5) _TrayIconSetToolTip($nTrayIcon1, "Datornamn: " & @ComputerName & @CRLF & "IPAdress: " & @IPAddress1 & " ," & @IPAddress2 & @CRLF & "Gateway: " & _GetGatewayIP() & @CRLF & " Internet error: " & @error & ", Host is unreachable.") ; _TrayTip($nTrayIcon1, "Lost Connection", "Error: " & @error & "Host is unreachable.", $nTimeOut = 3, $nInfoFlags = 0) _DebugOut("*PING: " & @error & ", Host is unreachable") _DebugOut("---------- (_Ping End)-----------" & @CRLF) ElseIf @error = 3 Then _DebugOut("---------- (_Ping Start)-----------") _TrayIconSetIcon($nTrayIcon1, @ScriptFullPath, -5) _TrayIconSetToolTip($nTrayIcon1, "Datornamn: " & @ComputerName & @CRLF & "IPAdress: " & @IPAddress1 & " ," & @IPAddress2 & @CRLF & "Gateway: " & _GetGatewayIP() & @CRLF & " Internet error: " & @error & ", Bad destination") ; _TrayTip($nTrayIcon1, "Lost Connection", "Error: " & @error & " Bad destination.", $nTimeOut = 3, $nInfoFlags = 0) _DebugOut("*PING: " & @error & ", Bad destination") _DebugOut("---------- (_Ping End)-----------" & @CRLF) ElseIf @error = 4 Then _DebugOut("---------- (_Ping Start)-----------") _TrayIconSetIcon($nTrayIcon1, @ScriptFullPath, -5) _TrayIconSetToolTip($nTrayIcon1, "Datornamn: " & @ComputerName & @CRLF & "IPAdress: " & @IPAddress1 & " ," & @IPAddress2 & @CRLF & "Gateway: " & _GetGatewayIP() & @CRLF & " Internet error: " & @error & ", Other errors") ; _TrayTip($nTrayIcon1, "Lost Connection", "Error: " & @error & " Other errors.", $nTimeOut = 3, $nInfoFlags = 0) _DebugOut("*PING: " & @error & ", Other errors") _DebugOut("---------- (_Ping End)-----------" & @CRLF) EndIf Else _DebugOut("*PING: The roundtrip-time took: " & $iPing & "ms.") _TrayIconSetIcon($nTrayIcon1, @ScriptFullPath, -1) _TrayIconSetToolTip($nTrayIcon1, "Datornamn: " & @ComputerName & @CRLF & "IPAdress: " & @IPAddress1 & " ," & @IPAddress2 & @CRLF & "Gateway: " & _GetGatewayIP() & @CRLF & " Internet: " & $iPing & " Ms.") ; _TrayTip($nTrayIcon1, "Internet Access", "Internet: " & $iPing & " Ms.", 3, 0) _DebugOut("---------- (_Ping End)-----------" & @CRLF) EndIf
-