Если выделенный текст имеет URL-адрес сайта и адрес электронной почты, то я хочу преобразовать все URL-адреса и адреса электронной почты в ссылку?

Question

например

этот

Ни один из ярлыков не является тем, что вы не могли бы сделать в Windows с помощью нескольких дополнительных щелчков мыши или с помощью небольшого стороннего приложения, но http://JDContextMenu.com объединяет их в небольшое меню простым нажатием одной кнопки. Вы можете скопировать полный адрес электронной почты@filename.com в буфер обмена

Должен быть преобразован в это

None of the shortcuts are things you couldn't do within Windows with a few extra clicks or with a small 3rd-party app, but <a href="http://JDContextMenu.com" title="Opens in a new window" target="_blank">http://JDContextMenu.com</a> bundles them together into a small menu with one-click ease. You can copy the full <a href="mailto:email@filename.com">email@filename.com</a> to the clipboard

И я хочу объединить это средство с этим сценарием Как выделить текст, а затем преобразовать с HTML-тегом?

Answer 1

Этот скрипт AutoHotkey должен работать, идентифицируя как URL, так и адреса электронной почты.

ALT+p - это определенная горячая клавиша:

!p::
ClipSaved := ClipboardAll
Clipboard=
Send ^c
ClipWait, 2
clipcontent = %Clipboard%
; Regular Expressions from RegExLib.com
; First lets search for the URLs
clipcontent := RegExReplace(clipcontent, "Si)(((file|gopher|news|nntp|telnet|http|ftp|https|ftps|sftp)://)|(www\.))+(([a-zA-Z0-9\._-]+\.[a-zA-Z]{2,6})|([0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}))(/[a-zA-Z0-9\&amp;%_\./-~-]*)?", "<a href=""$0"">$0</a>")
; And then for the email addresses
clipcontent := RegExReplace(clipcontent, "Si)[_a-zA-Z0-9-]+(\.[_a-zA-Z0-9-]+)*@[a-zA-Z0-9-]+(\.[a-zA-Z0-9-]+)*\.(([0-9]{1,3})|([a-zA-Z]{2,3})|(aero|coop|info|museum|name))", "<a href=""mailto:$0"">$0</a>")
Clipboard = <p>%clipcontent%</p>
ClipWait, 2
Send ^v
Clipboard := ClipSaved
ClipWait, 2
ClipSaved=
return