An alle Interessenten, die umfangreiche Sonderzeichen verwenden möchten, egal in welchem
Anwenderprogramm,
Microsoft stellt für Windows (noch Version 10) ein Programm zur Verfügung, mit dem man bequem
Tastaturbelegungen vornehmen kann, die man häufig braucht.
Microsoft Keyboard Layout Creator
Damit kann man auf der Basis eines Schriftfonts, der viel UniCode enthält, zusätzliche
Tastaturbelegungen herstellen, wie schon der englische Name sagt: Keyboard Layout Creator. Die
Belegungen erfolgen auf den beiden Ebenen AltGr + Taste, bzw. Shift + AltGr + Taste.
Allerdings muß bei der Anwendung jedesmal die neu hergestellte Tastatur aufgerufen werden. Bei Windows 10
mit <Windowsfenstertaste plus Leertaste>. Angezeigt rechts unten auf der Basisleiste werden
allerdings nur die fremdschriftlichen Symbole angezeigt, z.B. für Arabisch ع (erster Buchstabe für
ʿArabī) oder Hebräisch עבר (für Ivri).
Die Einstellungen gelten dann unter dem Betriebssystem Windows für alle Schriftarten, die auf
UniCode beruhen, und alle Anwendungs-Programme. Den Umfang des Schriftsatzes kann man am besten
überprüfen, wenn man die Funktion Zeichentabelle aufruft, das ist in WINDOWS ein eigenes Programm.
z.B.:
- Courier hat nur einen 'einfachen' Zeichensatz und die Funktion Unicode ist 'ausgegraut', d.h.
nicht vorhanden
- Courier New hat dagegen einen umfangreicheren Zeichensatz, den man sogar einzeln im Feld
'Zeichensatz' aufrufen kann
Ich verwende die von mir gemachten Einstellungen für ein umfangreiches Alfabet plus Sonderzeichen
wie → ← für abngeleitete Schriftformen, besonders aber, um semitische Schriften wie Arabisch und
Hebräisch in lateinische Umschriftzeichen umzusetzen. Das erfolgt nach internationalen Regeln, die
allerdinsg in verschiedenen Ländern unterschiedlich verwendet werden.
Die Grundregel, die die Deutsche Morgenländischen Gesellschaft (DMG) verfolgt: ist ein Laut in
fremdem Schriften und Sprachen wie Arabisch, Persisch und Hebräisch = ein Zeichen plus
diakritisches, d.h. unterscheidendes, Zeichen.
Beispiele:
Arabisch ج ist im DMG System ğ, im Englischen j und früher dj
Arabisch خ ist im DMG System ḫ, im Englischen kh und in anderen Systemen auch ch.
Oft entstehen Mißverständnisse, wie beim arabischen Namen Ishaq, der wird (korrekt) Is-ḥāq und
nicht Ischaq ausgesprochen. Das Mißverständnis kommt dadurch zustande, weil sh im Englische das
deutsche sch vertritt.
Übrigens: Falls bei euch 'meine' arabischen und hebräischen Zeichen erscheinen, habt ihr Unicode
eingestellt!
Arabisch und Hebräisch schreibe ich ebenfalls mit der Umschaltung <Windowsfenstertaste plus
Leertaste>. Tipphilfen gibt die Bildschirmtastatur.
Sicherlich gibt es für LINUX und APPLE Maschinen ähnliche Programme, die eine 'umständliche'
Programmierung von Macros überflüssig machen.
ansonsten wünsche ich frohes Schaffen,
Gehard (Wedel)
Am 28.11.2023 um 17:38 schrieb OoOHWHOoO:
Hallo *,
wenn man öfters in WRITER spezielle Zeichen einfügen will, ist es nützlich, für jedes Zeichen ein
kleines Makro zu schreiben und diese Makros mit bestimmten Tasten oder Tastenkombinationen zu
verknüpfen.
Ich habe das für die Guillemet-Zeichen gemacht und die Makros mit den Tasten F2-F5 verknüpft.
Funktioniert prima ...
' Guillemet: https://de.wikipedia.org/wiki/Guillemets
' Unicode : http://www.unicode.org/charts/
' » = [Alt]+[0187] Ziffernblock {windows} = U+00BB {unicode} = 0187 {decimal}
Sub F2_Guillemet_RECHTS
Dim oVC As Object
oVC = ThisComponent.CurrentController.getViewCursor()
oVC.getText.insertString(oVC.getStart(),Chr(187),False)
End Sub
' « = [Alt]+[0171] Ziffernblock {windows} = U+00AB {unicode} = 0171 {decimal}
Sub F3_Guillemet_LINKS
Dim oVC As Object
oVC = ThisComponent.CurrentController.getViewCursor()
oVC.getText.insertString(oVC.getStart(),Chr(171),False)
End Sub
' › = [Alt]+[0155] Ziffernblock {windows} = U+203A {unicode} = 8250 {decimal}
Sub F4_Guillemet_EINFACH_RECHTS
Dim oVC As Object
oVC = ThisComponent.CurrentController.getViewCursor()
oVC.getText.insertString(oVC.getStart(),Chr(8250),False)
End Sub
' ‹ = [Alt]+[0139] Ziffernblock {windows} = U+2039 {unicode} = 8249 {decimal}
Sub F5_Guillemet_EINFACH_LINKS
Dim oVC As Object
oVC = ThisComponent.CurrentController.getViewCursor()
oVC.getText.insertString(oVC.getStart(),Chr(8249),False)
End Sub
Grüße
Hans-Werner ;-))
-- Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy
Privacy Policy |
Impressum (Legal Info) |
Copyright information: Unless otherwise specified, all text and images
on this website are licensed under the
Creative Commons Attribution-Share Alike 3.0 License.
This does not include the source code of LibreOffice, which is
licensed under the Mozilla Public License (
MPLv2).
"LibreOffice" and "The Document Foundation" are
registered trademarks of their corresponding registered owners or are
in actual use as trademarks in one or more countries. Their respective
logos and icons are also subject to international copyright laws. Use
thereof is explained in our
trademark policy.