Serenity
Joined: 08 Nov 2004
Posts: 1007
|
 Posted: Wed Mar 16, 2005 12:06 pm Post subject: |
 |
|
This makes all existing windows transparent. Ctrl+Enter to make all windows transparent, Ctrl+Space to turn transparency off.
| Code: | ^enter::
WinGet, id, list
Loop, %id%
{
StringTrimRight, this_id, id%a_index%, 0
WinSet, Transparent, 200, ahk_id %this_id%
sleep, 100
}
return
^space::
WinGet, id, list
Loop, %id%
{
StringTrimRight, this_id, id%a_index%, 0
WinSet, Transparent, off, ahk_id %this_id%
sleep, 100
}
return |
You'll need to tweak it. Adding the sleep command helps, it probably needs to also refresh the windows after applying the transparency to reduce the glitches.
_________________
"Anything worth doing is worth doing slowly." - Mae West
 |
|
FAQ
Search
Memberlist
Register
Profile
Log in to check your private messages
Log in
