上回介绍了史上最强的 Alt + Tab,这回我们要学习的是 AHK 的数组。对本系列没兴趣的朋友对不起鸟。请直接略过。
以前用 Xplorer2 这款增强型资源管理器的时候,我就发现它一个很体贴的功能:当你重命名一个文件时,它会自动选中文件名,不会选中扩展名。后来用了 QT TabBar ,又开始怀念那个功能啦。今天的目标就是,实现它。隐藏了文件扩展名就没有这个选不选中扩展名的问题,我反正是喜欢让扩展名显示着。
脚本加解释。本次脚本下载:Google group(box 在我这里太慢了)。
~F2::
; 还记得 ~ 的用法么?
date = %clipboard%
; 先把剪贴板的内容保存下来。往往剪贴板里存放的就是文件的新名字。
send ^c
; 复制。为什么要复制呢?重命名的时候,系统会选中整个文件名。这时候就是复制了文件名(包括扩展名)
clipwait
StringSplit, pos, clipboard,`.
; 分解字符串函数 StringSplit,我们要把剪贴板的文字以“.”为分隔符进行分割。假如我们有一个文件叫 appinn.com.txt(以下都会以这个文件名来讲解),那么到这里它就会被分割成 appinn、com、txt 三个字符串。这三个字符串组成了一个数组 pos,我们要输出它们各自的值时候这样写:%pos1%(也就是输出了 appinn),%pos2%,%pos3% 。因为“.”是个特殊的符号,所以这里我们要用“`”这个转义符,还记得回车的转义符么?就是“`n”啦。
LastDot = % pos%pos0%
; 这句非常奇怪是吧?我们从后面开始说明,%pos0% 的值是 pos 数组的个数,继续上面的例子,那么这里 %pos0% 就是等于 3。“% pos%pos0%”就是数组中最后一个数!语法一定要这样写哦。到这里我们就把 txt(就是 pos3) 赋值给了 LastDot。
IfEqual, pos0, 1
; 如果重命名的是一个文件夹,假如一个文件夹的名字是不带点的,那么上面的分解字符串得到的数组元素只有 1 个。这样的话就会返回。
return
StepCount := StrLen(LastDot)
; 获得最后一个数组元素的长度。继续例子,把 3 赋值给 StepCount,也就是说 txt 是由 3 个字符组成的。
send +^{end}
; 把光标移动到文件名的最后面。继续例子,现在的光标在最后一个 t 后面。
sleep 100
; 暂停一下,保证脚本的正常。
loop %StepCount%
{
; 开始循环,循环的次数是最后一个数组元素的长度(例子是循环 3 次)。
send {left}
; 那么这里就会把光标向左移动三次,也就说,光标现在在最后一个“.”的右边。
}
send {left}
; 再向做移动一次光标,相当于光标现在在在在最后一个“.”的左边。
send +^{home}
; 选中最后一个“.”的左边所有的文字,这时就选中了文件名(相当于选中了 appinn.com )。
clipboard = %date%
; 还原剪贴板
return
# sfufoet:暂停了 9 天的 AHK 快餐店,终于继续啦,最近工作挺忙的。我还发现一个有趣的现象,在资源管理器里面,不论你是右键重命名还是两次单击的重命名都会激活这个 F2 在桌面上就是不行。 ←看了读者 pluskid 的留言,我才发现 QT TabBar 原来就带有这个功能,我竟然画蛇添足。自我鄙视。 – –
说是更智能,其实也更笨蛋了,想修改扩展名的时候,就不爽鸟。
提示:先用 StringReplace, clipboard, clipboard, %A_SPACE%,, All 去除空格。
下期就不预告了,我还没决定好。
update:下回:AHK 快餐店[17] 之 秒杀 U 盘
原创文章,作者:3628473679,如若转载,请注明出处:https://blog.ytso.com/157027.html