I'm having some trouble restoring a program which uses a normal AutoIT-GUI and is used as a ToolKit for our customers to open different (external) tools, check their network connections or ping different destinations. Almost all customers are running this script on Win7 x64.
What do I want to do?
When the program is already running and the user tries to start it for a second time, it should exit the second instance after activating/restoring the first instance.
What did I do to integrate this?
I used a little piece of script found on the forums to prevent opening a second instance and modified it as follows:
$g_szVersion = "VSOL ToolKit" If WinExists($g_szVersion) Then Local $gState = WinGetState($g_szVersion) MsgBox(0,"","gState = " & $gState) ;For debugging purposes WinSetState($g_szVersion,"",@SW_SHOW) MsgBox(0,"","gState = " & $gState) ;For debugging purposes WinSetState($g_szVersion,"",@SW_RESTORE) MsgBox(0,"","gState = " & $gState) ;For debugging purposes WinActivate($g_szVersion) Exit EndIf AutoItWinSetTitle($g_szVersion) I have tried it with only the @SW_SHOW, only the @SW_RESTORE, both of them in a different order, same difference, it doesn't work.
What does happen then?
It detects the current state (when it's minimized) as '5', which means enabled and hidden. After setting the state to show, the state changes to 7. Restoring doesn't change the state. But what is really odd, is that the window doesn't appear but AutoIt seems to create a néw window with the same title as the existing one.
It doesn't matter if the window was originally minimized by clicking the minimize button in the GUI or by a line of code in my script. For example, when users open a software package from within my script, a similar function to this one will be called:
Func VSOL_FFTOOLS_SHOW_DOWNLOADS() GUISetState(@SW_MINIMIZE,$VSOL_BACKEND) ShellExecute(@UserProfileDir & "\Downloads") EndFunc The only thing that does work, is when the window is running in a non-minimized state (somewhere behind the current window), it gets activated and receives the focus when trying to start the second instance.
If anyone could help me out with this one, I'd be forever thankful :-)
Thanks in advance!
I'm trying to fill a ListView with all normal viewable windows to act with them.
First I tried with WinList:
Local $aWinList = WinList("[REGEXPTITLE:(?i)(.+)]") Local $aTmp, $iID ;~ _ArrayDisplay($aWinList) For $i = $aWinList To 1 Step -1 ; going backwards not disturbing the index while cycling through and deleting some If StringStripWS( $aWinList[$i], 3) == "" Or _ Not BitAND(WinGetState($aWinList[$i]), $WIN_STATE_VISIBLE) Or _ BitAND(WinGetState($aWinList[$i]), $WIN_STATE_MINIMIZED ) Then _ArrayDelete($aWinList, $i) Else ; Window has a Title and is "visible" $aTmp = WinGetPos($aWinList[$i]) If $aTmp < -1000 Or $aTmp < -1000 Then ; Window is minimized or tray icon _ArrayDelete($aWinList, $i) EndIf EndIf Next $aWinList = UBound($aWinList)-1 ; getting actual # of windows ; Each row is now [ID]=> [Title], [hWnd] But it keeps getting Windows which are definitely not there at least not visible:
Those windows "Rechner", "Einstellungen", "Netflix", "Microsoft Store", ... are not there!?!
It should list only the first three windows, which are real.
I even tried it with _WinAPI_ UDF:
$hWnd = _WinAPI_GetForegroundWindow() ; Add items _GUICtrlListView_BeginUpdate($idListview) If $hWnd <> 0 Then $iI = 0 Do If _WinAPI_IsWindow($hWnd) And _WinAPI_IsWindowVisible Then _GUICtrlListView_AddItem($idListview, WinGetTitle($hWnd)) _GUICtrlListView_AddSubItem($idListview, $iI, $hWnd, 1) $iI += 1 $hWnd = _WinAPI_GetWindow($hWnd, $GW_HWNDNEXT) EndIf Until $hWnd = 0 EndIf But it is the same...
How can i distinguish those invisible windows from normal ones?
PS: I'm using Windows 10, maybe it is important to know?
I am attempting to drag and drop a file from one windows explorer window to another windows explorer window (henceforth referred to as window1 and window2). I am not using the web. I have used autowinexp.au3 (taken from LarsJ's automatewindowsexplorer.au3) to give focus (function GetFileFocus) to a file on window1. The problem is that sometimes the file with the focus is not displayed on window1 because it is farther down the list than what is displayed in window1. There are other ways to accomplish this (like copy and paste) but I want to emulate the GUI doing a drag and drop. I work as a digital forensicator and my task is to examine what artifacts are left behind on move/copy vs a drag and drop. Please note that when I open window1 and window2 they are on top of each other, so I drag window2 over about 1150 pixels and that part works great.
My code is listed below. Please understand that I have tried several different methods to accomplish this task. The last one was to estimate that the top of the window1 header is approximately 320 pixels and to multiply the index of the file by 20 pixels since that appears to be the approximate height of individual files using the AutoIT Windows Info tool. Ideally the program would search window1 for the file name text and provide a mouse position for it. Or the program would allow me to scroll to where the file name is located. Any and all ideas are welcome.
Using Windows 10
PS Any problems in autowinexp.au3 are mine and not the author of automatewindowsexplorer.au3.
Full script w/details in comments below, just in case you need to run it to see the problem. Basically WinGetPos is incorrectly returning the W & H sizes, while at the same time correctly returning the positions. To compound the problem, I ran the same script on 2 different PCs and it gets2 different results as follows:
Win7 Pro PC.. GUICreate used to set W:300, H:100. WinGetPos returns W:307, H:127 (PC screen res: 1366x768)
WinXP PC..... GUICreate used to set W:300, H:100. WinGetPos returns W:308, H:134 (PC screen res: 1152x864)
The bigger problem occurs when you consider I want to save the Window sizes and recreate the window at a later date. but due to this problem, each time I ran the program the Window would get larger and larger. --pete
#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> ; SCRIPT DESC.: Simple script here. Create & display one Window of a specific ; size & position. This Window is always ON TOP of other windows. ; User may resize the window to cover up unwanted content (as in use with a Web-Browser). ; Upon user closing the Window, DEBUG msgbox in script returns window size & position ; to be used in further development of this script. ; ; PROBLEM: If user does not resize the Window and simply clicks "X" to close the window, ; the DEBUG msgbox is reporting the wrong SIZES. It's actually the AutoIt WinGetPos ; function that is returning correct positions, but incorrectly returning the sizes. ; It should be returning 300 (W), 100 (H), but it's incorrectly returning 307 (W), 127 (H) ; _MAIN() Func _MAIN() ;Local $sFilePath = "..\GUI\logo4___.gif" Local $l_SizeWidth_1, $l_SizeHeight_1, $l_PosLeft_1, $l_PosTop_1 ; Defaults for Window 1 Size and Position $l_SizeWidth_1 = 300 $l_SizeHeight_1 = 100 $l_PosLeft_1 = 50 $l_PosTop_1 = 50 ; Create re-sizable GUI window/form that is blank with a black background and stays on TOP over over windows. Local $hGUI = GUICreate("COVER UNWANTED CONTENT", $l_SizeWidth_1, $l_SizeHeight_1, $l_PosLeft_1, $l_PosTop_1, _ $WS_OVERLAPPEDWINDOW, $WS_EX_TOPMOST) ; Black Background GUISetBkColor(0x000000) ;GUICtrlCreatePic("..\GUI\msoobe.jpg", 0, 0, 400, 100) ; Display the GUI. GUISetState(@SW_SHOW, $hGUI) ; Create a picture control with a transparent image. ;GUICtrlCreatePic($sFilePath, 0, 0, 169, 68) ; Display the Window GUISetState(@SW_SHOW) ; Loop until the user exits. While 1 Switch GUIGetMsg() ; CASE IF USER X's out, CLOSE THE WINDOWS & QUIT Case $GUI_EVENT_CLOSE ExitLoop ; CASE Open a second window EndSwitch WEnd ; Obtain the window(s) Size & Positions _WindowPositionAndSize($hGUI) ; Save the window(s) size & positions ; TBD ; Delete the previous GUIs and all controls. GUIDelete($hGUI) EndFunc ;==>_MAIN Func _WindowPositionAndSize($WindowID) ; Retrieve the position as well as height and width of the window. Local $aPos = WinGetPos($WindowID) ; DEBUG msgbox ; Display the array values returned by WinGetPos. MsgBox(0, "", "X-Pos: " & $aPos & @CRLF & _ "Y-Pos: " & $aPos & @CRLF & _ "Width: " & $aPos & @CRLF & _ "Height: " & $aPos ) ; DEBUG notes ; Width 300 off by a factor of.. 0.9740261 ; Height 100 off by a factor of.. 0.7874017 ; I was hoping to add in some correction factors, but thse factors ; change dramatically at different Width & Height settings. Need a better fix! EndFunc ;==>_WindowPositioAndSize
Func workSpaceSetup () ConsoleWrite ("workSpaceSetup" &@CRLF) $workSpace = WinGetHandle ("some site - Google Chrome") ConsoleWrite ($workSpace&@CRLF) $pos1 = WinGetPos ($workSpace) WinMove ($workSpace , "", $pos1 , $pos1 , 1366, 768, 0) EndFunc So the script is first, the error I get is second in the quote.
This is one function of many for an app I am building but it is the first one that runs so I know there aren't other things at play here.
The idea is to keep the window in the same space it is when the script runs but just resize it as this app is used across multiple computers with different screen resolutions.
Could someone please elaborate upon what "Subscript used on non-accessible variable" means?
Oh and the variable is declared as "Global $pos1 = 0" at the top outside of any functions with the other global variables.
Any advice would be greatly appreciated!