Schriftformatierung für Word (Reports)
Schriftart (einfache Form) | In dieser Variante, nimmt man für den neuen Font eine Zahl, die sicher noch nicht in Gebrauch ist, das heisst eine Zahl die von keiner Schriftart in Word genutzt wird. |
---|---|
FontNumbers.Add(300); | Ein neuer Font mit der Zahl 300 wird erstellt. Diese Schriftnummer sollte nicht schon verwendet worden sein. |
Fonts.Add("{\\f300 Verdana;}"); | Der Font 'Verdana' wird der Zahl '300' hinzugefügt. |
Result = "\\f300 Test"; | Der neue Font wird in den Kommentar eingefügt mit dem Text 'Test'. |
Schriftart (komplexe Form) | In dieser Variante, wird automatisch eine Zahl generiert, die noch nicht in Gebrauch ist. |
Li_FontNumber = -1; | Die Font Nummer wird auf '-1' gesetzt |
Ls_FontName = "Cavolini"; | Der Font Name wird auf 'Cavolini' gesetzt |
for (Li_i = 0;Li_i < Fonts.GetSize();Li_i++) | Hier wird die Zahl der neuen Farbe erhöht, bis sie die neue grösste Zahl ist. |
{ if (StrFind(Fonts[Li_i],Ls_FontName,0) >= 0) | |
{ Li_FontNumber = FontsNumbers[Li_i]; }} | |
if (Li_FontNumber == -1) | Wenn die Font Nummer = '-1' ist |
{ Li_FontNumber = FontNumbers[FontNumbers.GetSize() - 1] + 1; | |
FontNumbers.Add(Li_FontNumber); | |
Fonts.Add("{\\f" + Li_FontNumber + " " + Ls_FontName + ";}");} | Alles wird zusammengefügt (Zahl, Name) und zum neuen Font gemacht |
Result = "\\f"+Li_FontNumber+" Test"; | Der neue Font wird in den Kommentar eingefügt mit dem Text 'Test' |
Schriftfarbe (einfache Form) | In dieser Variante, nimmt man für die Farbe eine Zahl höher als es im Dokument hat. |
ColorNumbers.Add(33); | Eine neue Farbe mit der Zahl '33' wird erstellt. Diese Nummer muss die nächst höhere im Array sein. |
Colors.Add("\\red46\\green138\\blue127;"); | Die neue Farbe wird definiert |
Result = "\\cf33 Test"; | Die neue Farbe wird in den Kommentar eingefügt zum Text 'Test' |
Schriftfarbe (komplexe Form) | In dieser Variante wird automatisch die nächst höhere Zahl generiert und für die neue Farbe gebraucht. |
Li_ColorNumber = ColorNumbers.GetSize()+1; | Der Anzahl vorhandener Farben, wird eine neue Zahl dazugefügt |
ColorNumbers.Add(Li_ColorNumber); | Die neue Anzahl der Farben wird aktualisiert |
Colors.Add("\\red46\\green138\\blue127;"); | Die neue Farbe wird definiert |
Result = "\\cf"+Li_ColorNumber+" Test"; | Die neue Farbe wird in den Kommentar eingefügt mit dem Text 'Test' |
Schriftgrösse | |
Result = "\\fs30 Test"; | Schriftgrösse wird auf '30' (Grösse '15' in Word) |