Jump to content
Sign in to follow this  

Winsettrans on all open windows

Recommended Posts



Is it possible to do a "winsetrans" for all active windows during the time of my autoit script like.

I see the same when i change the theme of my windows XP.

I test with winsettrans but i want this effect on all windows opened in the computer (relly like change themes on windows) during my gui is open.

Is it possible with autoit ?

Thanks for help and sorry for my bad english

Share this post

Link to post
Share on other sites

Just for giggles:

#include <array.au3>

; List visible windows
Global $avWinList = WinList()
Global $avVisibleList[1] = [0]
For $w = 1 To $avWinList[0][0]
    If BitAND(WinGetState($avWinList[$w][1]), 2) Then _ArrayAdd($avVisibleList, $avWinList[$w][1])
$avVisibleList[0] = UBound($avVisibleList) - 1

HotKeySet("{ESC}", "_Quit")

; Fade them in and out
Global $iFadeStart = 254, $iFadeEnd = 0, $iStep = -10
While 1
    ; Fade all windows in/out
    For $f = $iFadeStart To $iFadeEnd Step $iStep
        For $w = 1 To $avVisibleList[0]
            WinSetTrans($avVisibleList[$w], "", $f)
    ; Toggle the fade
    If $iStep = -10 Then
        $iFadeStart = 1
        $iFadeEnd = 255
        $iStep = 10
        $iFadeStart = 254
        $iFadeEnd = 0
        $iStep = -10

Func _Quit()
    For $w = 1 To $avVisibleList[0]
        WinSetTrans($avVisibleList[$w], "", 255)
EndFunc   ;==>_Quit


Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law

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.