[ahk]复制当前文件，并以当前文件夹名称命名

;【作者】sunwind

;【时间】2015年11月2日11:27:22

;【功能】本例是按F4复制当前文件，并以当前文件夹名称命名

;【原理】实现ClipboardPath 功能，还可以自由扩展，比如对rar文件即解压缩，对mp3文件立即播放等等

;热键F4

F4::

ClipSaved := ClipboardAll

Clipboard =

Send, ^c

ClipWait

If !ErrorLevel

{

   FullFileName=%Clipboard%

   Loop, parse, FullFileName, `n, `r

   {

       SplitPath, A_LoopField, name, dir, ext, name_no_ext, drive

       SplitPath,dir, fatherDirName

       FileCopy,%FullFileName%,%dir%\%fatherDirName%.%ext%

   }

}

Clipboard := ClipSaved

ClipSaved =

Return