AutoHotkey中文社区
文章
评论
关注
粉丝
私信列表所有往来私信
财富管理余额、积分管理
推广中心推广有奖励
任务中心每日任务
成为会员购买付费会员
认证服务申请认证
小黑屋关进小黑屋的人
我的订单查看我的订单
我的设置编辑个人资料
进入后台管理
这个人很懒，什么都没有留下！
概览
发布的
订单
邀请码
收藏
设置
if (IME_GET()=1) 中文 else 英文
用这个函数试试
IME_GET(WinTitle="") { IfEqual WinTitle,, SetEnv,WinTitle,A WinGet,hWnd,ID,%WinTitle% DefaultIMEWnd := DllCall("imm32ImmGetDefaultIMEWnd", Uint,hWnd, Uint) DetectSave := A_DetectHiddenWindows DetectHiddenWindows,ON SendMessage 0x283, 0x005,0,,ahk_id %DefaultIMEWnd% DetectHiddenWindows,%DetectSave% return ErrorLevel } return
我有好多类似的热字符串，所以想做个函数，看起来清爽点
请问这个Function可以带变量吗？
:X:tt1::Function(%A_YYYY%%A_MM%%A_DD%)
Function(strzz) { if(RegExMatch(strzz,"htt")) run,%strzz% else SendInput,{Text}%strZz% return }
并不行啊。用的v1
热字符串的方式，怎么样可以运行一个函数？
太棒了。不用剪切板
在楼主的启发下，改为ctrl双击打开软件。只需要修改「指定打开软件」的内容即可。
~Ctrl:: 指定打开软件 = ( dwg=C:QCCADReader.exe.lnk pdf=C:QC工程易览PDF.exe.lnk jpg,jpeg,png=C:QCPhotoshop.lnk )
if (A_ThisHotkey = A_PriorHotkey && A_TimeSincePriorHotkey < 300) { 原始剪切板 := ClipboardAll ; 这是通过复制的方式获取文件路径，处理一下clipboard Clipboard = ; 清空一次剪切板 Send, ^c ; 复制【对文件复制，剪切板内含当前文件的完整路径】 ClipWait, 0.5 ; 等待剪切板变化 RegExMatch(Clipboard, "(?<=.)[^.]+$", KuoZhanMing) ; 取当前文件扩展名，存入KuoZhanMing【参RegExMatch函数】 Loop, Parse, 指定打开软件, `n, `r ; 逐行解析用来预设应用的字符串ZhiDingRuanJian {
WenJian := RegExReplace(A_LoopField,"=.+") ; 取当前行=左侧内容 【预设的扩展名】 WenJian := StrReplace(WenJian,A_Tab) ; 取左侧内容清理tab 【预设的扩展名】 RuanJian := RegExReplace(A_LoopField,"^.+=") ; 取当前行=右侧内容 【预设的软件】 IF KuoZhanMing in %WenJian% ; 如果当前选中文件的扩展名【KuoZhanMing】包含于【预设的扩展名】 { Run, %RuanJian% "%Clipboard%" ; 用【第2个软件】打开当前选中的软件 } } Clipboard := "" ; 打开动作完成，清空一次剪切板 Clipboard := 原始剪切板 ; 把之前存到变量的所有剪切板内容恢复到剪切板 原始剪切板 := "" ; 清空变量 return }
findtext
解锁会员权限
开通会员
解锁海量优质VIP资源
立刻开通
今日签到
连续签到
之前
未认证
if (IME_GET()=1)
中文
else
英文
用这个函数试试
IME_GET(WinTitle="")
{
IfEqual WinTitle,, SetEnv,WinTitle,A
WinGet,hWnd,ID,%WinTitle%
DefaultIMEWnd := DllCall("imm32ImmGetDefaultIMEWnd", Uint,hWnd, Uint)
DetectSave := A_DetectHiddenWindows
DetectHiddenWindows,ON
SendMessage 0x283, 0x005,0,,ahk_id %DefaultIMEWnd%
DetectHiddenWindows,%DetectSave%
return ErrorLevel
}
return
我有好多类似的热字符串，所以想做个函数，看起来清爽点
请问这个Function可以带变量吗？
:X:tt1::Function(%A_YYYY%%A_MM%%A_DD%)
Function(strzz)
{
if(RegExMatch(strzz,"htt"))
run,%strzz%
else
SendInput,{Text}%strZz%
return
}
并不行啊。用的v1
热字符串的方式，怎么样可以运行一个函数？
太棒了。不用剪切板
在楼主的启发下，改为ctrl双击打开软件。只需要修改「指定打开软件」的内容即可。
~Ctrl::
指定打开软件 =
(
dwg=C:QCCADReader.exe.lnk
pdf=C:QC工程易览PDF.exe.lnk
jpg,jpeg,png=C:QCPhotoshop.lnk
)
if (A_ThisHotkey = A_PriorHotkey && A_TimeSincePriorHotkey < 300)
{
原始剪切板 := ClipboardAll ; 这是通过复制的方式获取文件路径，处理一下clipboard
Clipboard = ; 清空一次剪切板
Send, ^c ; 复制【对文件复制，剪切板内含当前文件的完整路径】
ClipWait, 0.5 ; 等待剪切板变化
RegExMatch(Clipboard, "(?<=.)[^.]+$", KuoZhanMing) ; 取当前文件扩展名，存入KuoZhanMing【参RegExMatch函数】
Loop, Parse, 指定打开软件, `n, `r ; 逐行解析用来预设应用的字符串ZhiDingRuanJian
{
WenJian := RegExReplace(A_LoopField,"=.+") ; 取当前行=左侧内容 【预设的扩展名】
WenJian := StrReplace(WenJian,A_Tab) ; 取左侧内容清理tab 【预设的扩展名】
RuanJian := RegExReplace(A_LoopField,"^.+=") ; 取当前行=右侧内容 【预设的软件】
IF KuoZhanMing in %WenJian% ; 如果当前选中文件的扩展名【KuoZhanMing】包含于【预设的扩展名】
{
Run, %RuanJian% "%Clipboard%" ; 用【第2个软件】打开当前选中的软件
}
}
Clipboard := "" ; 打开动作完成，清空一次剪切板
Clipboard := 原始剪切板 ; 把之前存到变量的所有剪切板内容恢复到剪切板
原始剪切板 := "" ; 清空变量
return
}
findtext