我编写的代码是这样的,选中某个文件,按快捷键1,弹出按钮,点击按钮,文件就自动移动到所示的文件夹里面。代码如下:
===============
1::
Gui, Add, Button, x46 y30 w120 h40 gShuijiao, 睡觉
Gui, Add, Button, x46 y90 w120 h40 gzuoxia, 坐下
Gui, Add, Button, x46 y150 w120 h40 gzhanzhe, 站着
Gui, Add, Button, x46 y210 w120 h40 gtangxia, 躺下
Gui, Add, Button, x46 y270 w120 h40 gzoulu, 走路
Gui, Show, x394 y192 h369 w220, New GUI Window
Return
Shuijiao:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\睡觉\
}
Return
zuoxia:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\坐下\
}
Return
zhanzhe:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\站着\
}
Return
tangxia:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\躺下\
}
Return
zoulu:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\走路\
}
Return
GuiClose:
ExitApp
===============
但是点击按钮后,文件并没有移动,是我button那里编写错误了吗?
问题二,我想把窗口透明化,于是参考以下代码,但是以下代码是通过按按钮实现切换透明,我只是需要一打开所编写的ahk,其窗口就透明,不需要按按钮切换。尝试改动代码,但是改了很多遍,始终不行。请问如何把窗体透明化(不需要通过按钮切换,一打开脚本,窗口就已经是透明了,剩下按钮)?。
=============
Gui +LastFound +ToolWindow +E0x40000 -Caption -SysMenu AlwaysOnTop
Gui, Add, Button, gShuijiao Default, 坐着
Gui, Color, 101000 ;设置窗体背景颜色
Gui, Show, w400 h300 Center, %GUITitle%
Return
Shuijiao:
WinGet, TransColor, TransColor, %GUITitle%
if (TransColor = 0x101000)
{
WinSet, TransColor, Off, %GUITitle%
return
}
WinSet, TransColor, 101000
return
=============
===============
1::
Gui, Add, Button, x46 y30 w120 h40 gShuijiao, 睡觉
Gui, Add, Button, x46 y90 w120 h40 gzuoxia, 坐下
Gui, Add, Button, x46 y150 w120 h40 gzhanzhe, 站着
Gui, Add, Button, x46 y210 w120 h40 gtangxia, 躺下
Gui, Add, Button, x46 y270 w120 h40 gzoulu, 走路
Gui, Show, x394 y192 h369 w220, New GUI Window
Return
Shuijiao:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\睡觉\
}
Return
zuoxia:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\坐下\
}
Return
zhanzhe:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\站着\
}
Return
tangxia:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\躺下\
}
Return
zoulu:
Clipboard =
Send, ^c
ClipWait
Loop, parse, clipboard, `n, `r
{
FileMove, %A_LoopField%, C:\Documents and Settings\hskd\桌面\走路\
}
Return
GuiClose:
ExitApp
===============
但是点击按钮后,文件并没有移动,是我button那里编写错误了吗?
问题二,我想把窗口透明化,于是参考以下代码,但是以下代码是通过按按钮实现切换透明,我只是需要一打开所编写的ahk,其窗口就透明,不需要按按钮切换。尝试改动代码,但是改了很多遍,始终不行。请问如何把窗体透明化(不需要通过按钮切换,一打开脚本,窗口就已经是透明了,剩下按钮)?。
=============
Gui +LastFound +ToolWindow +E0x40000 -Caption -SysMenu AlwaysOnTop
Gui, Add, Button, gShuijiao Default, 坐着
Gui, Color, 101000 ;设置窗体背景颜色
Gui, Show, w400 h300 Center, %GUITitle%
Return
Shuijiao:
WinGet, TransColor, TransColor, %GUITitle%
if (TransColor = 0x101000)
{
WinSet, TransColor, Off, %GUITitle%
return
}
WinSet, TransColor, 101000
return
=============