将选中N个文件的文件名复制到桌面的1.txt

将选中N个文件的文件名复制到桌面的1.txt

>^x:: 
Clipboard := ""  ; 清空剪贴板
Send, ^c         ; 复制选中文件的路径
ClipWait, 1      ; 等待剪贴板更新

if (Clipboard) {
    FilePath := A_Desktop "\1.txt"
    FileDelete, %FilePath%  ; 先删除旧文件
    Loop, Parse, Clipboard, `n, `r  ; 按行解析剪贴板内容
    {
        SplitPath, A_LoopField, FileName  ; 获取文件名
        FileAppend, %FileName%`n, *%FilePath%, UTF-8  ; 使用 UTF-8 编码追加到文件
    }
    ;MsgBox, 文件名已保存至 %FilePath%
	Text=文件名已保存至 %FilePath%
	btt(Text,300,400,,"Style3")
	sleep, 2000
	btt()​
} else {
    MsgBox, 未选中文件！
}
return

;ΞΞΞΞΞΞΞΞΞ>^x 将选中N个文件的文件名复制到桌面的1.txt  ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 06-314