Seite 1 von 1

Steuerzeichen/TAG's (Attribute: Fett, Unterstrichen, ...)

Verfasst: Sa 26. Sep 2015, 22:08
von Dami
Aus meiner Base Anwendung (Praxisverwaltung) werden Briefe generiert, neben der Anschrift sind auch Textblöcke in der Datenbank hinterlegt, die dann entsprechend der Anamnese/Diagnose automatisiert zu einem Anschreiben/Brief zusammengestellt werden (reiner Text).
Hierzu verwende ich ein Makro welches 'Feldbefehl→ Platzhalter → Text' mit dem entsprechenden Text aus der Datenbank 'ersetzt'. Nun möchte ich auch diverse Passagen der Textblöcke mit
z.B. Unterstreichung oder Fett hervorheben.
Gibt es die Möglichkeit wie zu Staroffice-Zeiten durch voranstellen von Steuerzeichen/Attributen
solche Formatierungen durchzuführen (ähnlich z.B. HTML: <u> der unterstrichener Text </u>) ? :?:

Re: Steuerzeichen/TAG's (Attribute: Fett, Unterstrichen, ...)

Verfasst: Sa 26. Sep 2015, 22:55
von F3K Total
Hallo,
ich denke, du bist hier in der falschen Forumskategorie. Du schreibst ja selbst, das du ein Makro verwendest.
Mit dem Makro kannst du einen

Code: Alles auswählen

TextCursor
erzeugen, mit dem du alle Eigenschaften des Textes, z.B. Schriftgröße, Schriftart, fett, kursiv, unterstrichen, Schriftfarbe usw. einstellen kannst.
Den Textcursor erzeugst du z.B. so:

Code: Alles auswählen

oText = ThisComponent.Text
oTextCursor = oText.CreateTextCursor
Um den Text z.B. Fett zu machen ändert man die Eigenschaft

Code: Alles auswählen

oTextCursor.CharWeight
von 100 auf 150
also

Code: Alles auswählen

oTextCursor.CharWeight = 150
Mit den Suchworten
TextCursor und CharWeight findest du bestimmt Beispiele in den einschlägigen Foren.
Gruß R

Re: Steuerzeichen/TAG's (Attribute: Fett, Unterstrichen, ...)

Verfasst: Do 1. Okt 2015, 16:22
von Dami
F3K danke Dir für die schnelle Antwort.
Dies jedoch umzusetzen wird schon Aufwand...

Wenn ich dies richtig verstehe müsste ich:
ein Programm schreiben welches Marken für die entsprechende Hervorhebungen
im Text findet und interpretiert.

In Anlehnung an HTML als Beispiel:
<u> UText </u>
-> Lese Text ein, Finde die Position der Start- und Endmarke, lösche diese, wende die Attribute von Start- bis Endposition an.
Okay,.. mal schauen wann ich Zeit habe ;)