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) |