XREA.COM Logo XREA.COM Ad

スクリプト投稿スレ

62unnamed.ahk:05/02/02 03:41 ID:???
適当に書いた非常駐のウィンドウ最前面/透明化スクリプト
しょぼいけど晒してみる

SetTimer,ShowTooltip,300
t=OFF

Esc::
RButton::
ExitApp

ShowToolTip:
ToolTip,LButton `:最前面表示ON/OFF`nMButton `:透明度変更(%t%)`nShift+MButton `: 特定色透明化`nEsc/RButton `: キャンセル
return

LButton::
MouseGetPos,,,wnd
WinSet,Topmost,Toggle,ahk_id %wnd%
ExitApp

WheelDown::
If t=OFF
t=224
else
If t>0
t-=32
return
WheelUp::
If t<>OFF
{
t+=32
If t>0xFF
t=OFF
}
return

MButton::
MouseGetPos,,,wnd
WinSet,Trans,%t%,ahk_id %wnd%
ExitApp

+MButton::
MouseGetPos,xx,yy,wnd
PixelGetColor,cl,%xx%,%yy%,RGB
WinSet,TransColor,%cl% %t%,ahk_id %wnd%
ExitApp
70KB
名前: E-mail:
ファイル:
0ch BBS 2005-10-08