ich möchte eine Adresse, z.B. folgende
Max Mustermann
Musterstr. 123
98765 Musterstadt
01234-567890
wortweise so zerlegen, dass ich die einzelnen Wörter in die Zwischenablage kopieren kann. Mit einem vorhandenen Tool, das die Clipboard-History verwaltet, kann ich mir diese dann später einzeln aus der Zwischenablage zurückholen und weiterverarbeiten. Mein Vorgehen soll so aussehen:
1. kompletten Adress-Text markieren
2. Adress-Text in die Zwischenablage kopieren
3. mit F5 Routine zum Extrahieren der einzelnen Wörter aufrufen
Meine Ansätze führen nicht zum Erfolg, wobei mich Folgendes wundert: gehört die Zeile mit der MsgBox mit zum Code, dann funktioniert die Routine (jedes Wort wird in die Zwischenablage kopiert), kommentiere ich die Zeile aus bzw. lösche ich die Zeile, dann wird immer nur das letzte Wort in die Zwischenablage kopiert.
Code: Select all
F5::
MyClipboard = %clipboard%
; Trenne bei Leerraum und Zeilenumbruch
StringSplit, MyClip, MyClipboard, %A_Space%`r`n
Loop, %MyClip0%
{
Wort := MyClip%a_index%
; leere Wörter nicht berücksichtigen:
If Wort <>
{
clipboard = %Wort%
; MsgBox, Nr. %a_index%: %Wort% ; <== ???
}
}
Return
Code: Select all
F5::
MyClipboard = %clipboard%
; Trenne bei Leerraum und Zeilenumbruch
Loop, parse, MyClipboard, %A_Space%`r`n
{
; leere Wörter nicht berücksichtigen:
If A_LoopField <>
clipboard = %A_LoopField%
; MsgBox Nr. %A_Index%: %A_LoopField% ; <== ???
}
Return
Wo stehe ich auf dem Schlauch?
Vielen Danke schon mal im Voraus.
Lucky Joe