Jump to content
Sign in to follow this  
exevan

Problem with WinActive

Recommended Posts

exevan

So i writing autoswitch beetwen app and windows (I dont need to click alt+tab).

For example i have 3 windows title is:

-Furniture

-Furnit

-Other

When i click the button winactive Furniture and next the script must winactive Furnit but it doesn't work and activate window Furniture again, and next click is working and activate Other. How can i repair that?

Share this post


Link to post
Share on other sites
somdcomputerguy

Help others help you. Post the code you've got so far.

edit: you probably need to use WinActivate, not Winactive.

another edit: I see you are..

Edited by somdcomputerguy

- Bruce /*somdcomputerguy */  If you change the way you look at things, the things you look at change.

Share this post


Link to post
Share on other sites
exevan

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ColorConstants.au3>
#include <Array.au3>
HotKeySet("{TAB}","_ChangeWindows")
Global $Files, $i, $File = 0
#Region ### START Koda GUI section ### Form=D:\Moje - informatyka\AutoIT\AutoSwitchForm.kxf
$Form1 = GUICreate("AutoSwitch", 279, 288, 239, 157)
$Group1 = GUICtrlCreateGroup("Auto Switch", 8, 0, 265, 281)
$Label1 = GUICtrlCreateLabel("First File", 24, 24, 81, 17)
$Label2 = GUICtrlCreateLabel("Second File", 24, 56, 68, 17)
$Label3 = GUICtrlCreateLabel("Third File", 24, 88, 74, 17)
$Label4 = GUICtrlCreateLabel("Fourth File", 24, 120, 77, 17)
$Label5 = GUICtrlCreateLabel("Fifth File", 24, 152, 63, 17)
$Label6 = GUICtrlCreateLabel("Sixth File", 24, 184, 71, 17)
$Label7 = GUICtrlCreateLabel("Seventh File", 24, 216, 74, 17)
$Input1 = GUICtrlCreateInput("", 144, 24, 121, 21)
$Input2 = GUICtrlCreateInput("", 144, 56, 121, 21)
$Input3 = GUICtrlCreateInput("", 144, 88, 121, 21)
$Input4 = GUICtrlCreateInput("", 144, 120, 121, 21)
$Input5 = GUICtrlCreateInput("", 144, 152, 121, 21)
$Input6 = GUICtrlCreateInput("", 144, 184, 121, 21)
$Input7 = GUICtrlCreateInput("", 144, 216, 121, 21)
$Button1 = GUICtrlCreateButton("Save", 25, 248, 231, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

GUICtrlSetData($Input1, IniRead("config.ini","Files","First",'0'))
GUICtrlSetData($Input2, IniRead("config.ini","Files","Second",'0'))
GUICtrlSetData($Input3, IniRead("config.ini","Files","Third",'0'))
GUICtrlSetData($Input4, IniRead("config.ini","Files","Fourth",'0'))
GUICtrlSetData($Input5, IniRead("config.ini","Files","Piąta",'0'))
GUICtrlSetData($Input6, IniRead("config.ini","Files","Sixth",'0'))
GUICtrlSetData($Input7, IniRead("config.ini","Files","Seventh",'0'))
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _Save()

    EndSwitch
WEnd

Func _ChangeWindows()
    Local $Files[7] = [GUICtrlRead($Input1), GUICtrlRead($Input2), GUICtrlRead($Input3), GUICtrlRead($Input4), GUICtrlRead($Input5), GUICtrlRead($Input6), GUICtrlRead($Input7)]
    if $Files[$File] = "" then
        $File = 0
        WinActivate($Files[0])
    else
        WinActivate($Files[$File])
        $File = $File + 1
    endif
    tooltip("File: "&$File,0,0)
EndFunc

Func _Save()
    IniWrite("config.ini", "Files", "First", GUICtrlRead($Input1))
    IniWrite("config.ini", "Files", "Second", GUICtrlRead($Input2))
    IniWrite("config.ini", "Files", "Third", GUICtrlRead($Input3))
    IniWrite("config.ini", "Files", "Fourth", GUICtrlRead($Input4))
    IniWrite("config.ini", "Files", "Piąta", GUICtrlRead($Input5))
    IniWrite("config.ini", "Files", "Sixth", GUICtrlRead($Input6))
    IniWrite("config.ini", "Files", "Seventh", GUICtrlRead($Input7))
    GUICtrlSetData($Button1,"Saved")
    sleep(800)
    GUICtrlSetData($Button1,"Save") 
EndFunc

Edited by exevan

Share this post


Link to post
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
Sign in to follow this  

×

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.