如何删除点 (.) 前的文本
How to delete text before a dot (.)
我不知道如何编写脚本使其工作。但是,我知道 autohotkey 是一个强大的程序,可以帮助我节省时间。
请帮我写一个脚本,可以删除中间名的缩写,中间名后面通常有一个点,例如:
-> 斯蒂芬·默克尔
-> 威廉·莫兰
按下热键后我想要的结果:
=> 斯蒂芬·默克尔
=> 威廉·莫兰
如有任何帮助,我们将不胜感激。
谢谢!!
试试这个:
SendMode, Input
; -- Ctrl + . -> Delete middle name from selection
^.::
While GetKeyState("Ctrl","P")
Sleep, 25
Clipboard := ""
Send, ^c
ClipWait, 0
If ErrorLevel
Return
Sleep, 50
Clipboard := RegExReplace(Clipboard, "([A-Z][a-z]+) [A-Z]\. ([A-Z][a-z]+)", " ")
Send, ^v
Return
我不知道如何编写脚本使其工作。但是,我知道 autohotkey 是一个强大的程序,可以帮助我节省时间。
请帮我写一个脚本,可以删除中间名的缩写,中间名后面通常有一个点,例如:
-> 斯蒂芬·默克尔
-> 威廉·莫兰
按下热键后我想要的结果:
=> 斯蒂芬·默克尔
=> 威廉·莫兰
如有任何帮助,我们将不胜感激。
谢谢!!
试试这个:
SendMode, Input
; -- Ctrl + . -> Delete middle name from selection
^.::
While GetKeyState("Ctrl","P")
Sleep, 25
Clipboard := ""
Send, ^c
ClipWait, 0
If ErrorLevel
Return
Sleep, 50
Clipboard := RegExReplace(Clipboard, "([A-Z][a-z]+) [A-Z]\. ([A-Z][a-z]+)", " ")
Send, ^v
Return