Evening, I've been copying a lot of text from PDF files and other documents. Problem is, this text appears badly mangled when pasted again, causing formatting issues. I've been trying to write a script that would automatically reformat the copied string: #include
#include
#NoTrayIcon
Opt("TrayMenuMode", 1)
$AboutTrayItem = TrayCreateItem("About")
TrayCreateItem("")
$ExitTrayItem = TrayCreateItem("Exit")
TraySetState()
$hDLL = DllOpen("user32.dll")
Beep(1100,300)
While 1
While _IsPressed("11",$hDLL)
If _IsPressed("43",$hDLL) Then
ClipPut(StringStripWS(StringReplace(StringReplace(_ClipBoard_GetData(),@lf," "),@cr," "),4))
Beep(1300,150)
While _IsPressed("43",$hDLL)
Sleep(250)
WEnd
EndIf
WEnd
Local $msg = TrayGetMsg()
Select
Case $msg = $AboutTrayItem
MsgBox(64, "About", "When CTRL+C is pressed, a reformatted version of the string that has thereby been copied, without any newline characters, should be placed on the clipboard.")
Case $msg = $ExitTrayItem
ExitLoop
EndSelect
WEnd
DllClose($hDLL)
Beep(600,300) So far, it's working for some of my sources. Others, like this two-column book, I still can't nicely copy from. How do I get out all line breaks, newlines, carriage returns etc. out of a string? Thanks in advance!