AutoHotkey Community

Code: Select all

Liste=
(join`r`n
D:\Musik\Beispiel_1.mp3
D:\Musik\Beispiel_2.MP3
D:\Musik\Beispiel_3.MP3
D:\Musik\Beispiel_4.MP3
D:\Musik\Beispiel_5.mp3
D:\Musik\Beispiel_1.mp3
D:\Musik\Beispiel_2.MP3
D:\Musik\Beispiel_3.MP3
D:\Musik\Beispiel_4.MP3
D:\Musik\Beispiel_5.mp3
)

MaxZeilen := StrSplit(Trim(Liste, "`r`n"), "`r`n").MaxIndex() - 1
For i, v in StrSplit(Trim(Liste, "`r`n"), "`r`n")
{
NewListe .= v "`r`n"

	if (i = MaxZeilen)
	break
}

MsgBox, % RTrim(NewListe, "`r`n")

Code: Select all

Liste=
(join`r`n
D:\Musik\Beispiel_1.mp3
D:\Musik\Beispiel_2.MP3
D:\Musik\Beispiel_3.MP3
D:\Musik\Beispiel_4.MP3
D:\Musik\Beispiel_5.mp3
D:\Musik\Beispiel_1.mp3
D:\Musik\Beispiel_2.MP3
D:\Musik\Beispiel_3.MP3
D:\Musik\Beispiel_4.MP3
D:\Musik\Beispiel_5.mp3
)

SuchText := StrSplit(Trim(Liste, "`r`n"), "`r`n").pop()
ErsetzeDurch := ""
MsgBox, % NewListe := RegExReplace(Liste,"\Q" SuchText "\E", ErsetzeDurch,,1,InStr(Liste,SuchText,,0))

Code: Select all

Heu := "aa ich bin aah ein TestString aa usw."
SuchText := "aa"
ErsetzeDurch := "kk"
MsgBox, % NewHeu := RegExReplace(Heu,SuchText, ErsetzeDurch,,1,InStr(Heu,SuchText,,0)) 

Code: Select all

Heu := "aa ich bin aah ein TestString aa usw."
Nad := "(.*)\Kaa(.*?$)|$"
NewHeu := RegExReplace(Heu, Nad, "$2")
MsgBox, %  NewHeu