使用autohotkey自動加入行

Question

將文本複製到剪貼板並粘貼到Word中時，Adobe Acrobat中的長段落會導致換行。

爲了解決這個問題，我手動將複製的文本粘貼到記事本++>選擇全部> ctrl + J（連接線）>全選>複製......然後將其粘貼到我的Word文檔中。

我想使用autohotkey自動化這個連接線，因爲我有大量的文件要通過。我似乎無法在網上找到任何直接在autohotkey腳本中處理這個問題的例子。

Ex。

Data structures with labeled axes supporting automatic or explicit data alignment. 
This prevents common errors resulting from misaligned data and working with 
differently-indexed data coming from different sources. 

在記事本++

Data structures with labeled axes supporting automatic or explicit data alignment. This prevents common errors resulting from misaligned data and working with differently-indexed data coming from different sources. 

Answer 1

手動加入後試試這個：

#Persistent 
return 

    OnClipboardChange: 
If WinActive("ahk_exe AcroRd32.exe") 
{ 
    clipboard = 
    Send, {Ctrl down}c{Ctrl up}{Esc} 
     ClipWait 
    clip := RegExReplace(clipboard, "(\S.*?)\R(.*?\S)", "$1 $2") ; strip line breaks and replace them with spaces 
    clipboard = %clip% 
    StringReplace clipboard, clipboard, % " ", % " ", A   ; replace double spaces with single spaces 
     ClipWait 
    ControlClick, x0 y0, A 
} 
return 

編輯

或者這樣：

#Persistent 
return 

    OnClipboardChange: 
If WinActive("ahk_class AcrobatSDIWindow") 
{ 
    clipboard := "" 
    Send, {Ctrl down}c{Ctrl up}{Esc} 
     ClipWait 
    clip := RegExReplace(clipboard, "(\S.*?)\R(.*?\S)", "$1 $2") ; strip line breaks and replace them with spaces 
    StringReplace clip, clip, % " ", % " ", A   ; replace double spaces with single spaces 
    clipboard := "" 
    clipboard = %clip% 
    ClipWait 2 
    If !(ErrorLevel) 
    { 
     ToolTip, lines joined 
     Sleep 500 
     ToolTip 
    } 
} 
return 

Answer 2

這工作：

#Persistent 
OnClipboardChange("ClipChanged") 
return 

ClipChanged() { 

    If (WinActive("ahk_exe AcroRd32.exe")) { 
     For e, v in StrSplit(clipboard, "`n", "`r") 
      x .= v " " 
     clipboard := trim(x) 
    } 
}