Anführungszeichen Anfügen

Textbausteine und Erweiterungen, die von Anwendern für die Allgemeinheit bereitgestellt werden.
Post Reply
cwolke
Posts: 14
Joined: 28 Dec 10, 12:05

Anführungszeichen Anfügen

Post by cwolke » 16 Nov 17, 14:43

Dieser Makro erlaubt es, um einen markierten Text korrekte Anführungszeichen anzufügen. Wenn kein Text markiert ist, werden einfach leere „“ angefügt, und der Cursor springt zwischen die Anführungszeichen. Ein Leerzeichen am Textende wird korrekt entfernt.

Beispiele:
  • Cursor steht zwischen Hallo und Welt: Hallo „“ Welt und Cursor springt zwischen die „Tüttelchen“
  • Die Worte Hallo und Welt sind markiert: „Hallo Welt“
  • Das Wort Hallo und der Leerraum danach sind markiert: „Hallo“ Welt
Hier die Version für deutsche Anführungszeichen:

Code: Select all

{#SETCLIPBOARD}{#clipboard -copy}{#settemp -name len -content {#length {#insertclipboard}}}{#check -text {#gettemp len} -case == 0 -output „“{#LEFT} -else {#check -text {#substr {#insertclipboard} -from {#calc {#gettemp len} -round 0} -count 1} -case == {#asc 32} -output „{#trimright {#insertclipboard}}“  -else „{#insertclipboard}“}}
und hier die englische Version:

Code: Select all

{#SETCLIPBOARD}{#clipboard -copy}{#settemp -name len -content {#length {#insertclipboard}}}{#check -text {#gettemp len} -case == 0 -output “”{#LEFT} -else {#check -text {#substr {#insertclipboard} -from {#calc {#gettemp len} -round 0} -count 1} -case == {#asc 32} -output “{#trimright {#insertclipboard}}”  -else “{#insertclipboard}”}}
Viel Spaß! Christian

Post Reply