TFont

TFont beschreibt die Schriftmerkmale für die Anzeige von Text. TFont definiert einen Zeichensatz über die Schrifthöhe, die Schriftart, die Schriftattribute ( z.B. fett und kursiv ) usw.

Eigenschaften

Eigenschaft

Beschreibung

Charset:N

Durch die Festlegung von Charset bestimmen Sie den Zeichensatz, der für die Schrift verwendet wird.

Jede Schriftart (angegeben in der Eigenschaft Name) unterstützt mindestens einen Zeichensatz. Die zulässigen Werte für Charset entnehmen Sie der Dokumentation des Zeichensatzherstellers.

Color:N

Verwenden Sie Color, um die Farbe für die Textzeichen festzulegen. Es stehen Farbkonstanten wie z.B. clRed, clGreen etc. zur Verfügung, um die Farbe dynamisch zuzuweisen.

Height:N

Mit der Eigenschaft Height können Sie die Höhe einer Schrift in Pixel festlegen. Bei einem negativen Wert wird der interne Abstand über den einzelnen Textzeilen nicht berücksichtigt. Bei einem positiven Wert für Height errechnet sich die Höhe aus der Schrifthöhe plus dem internen Abstand.
Verwenden Sie die Eigenschaft Size, wenn die Schriftgröße in Punkt angegeben werden muss. In einer Anwendung wird die Schriftgröße vom Benutzer normalerweise in Punkt angegeben. Anwendungsprogrammierer hingegen befassen sich bei der Anzeige einer Schrift auf dem Bildschirm normalerweise mit der tatsächlichen Größe der Schrift in Pixel.

Mit folgender Formel kann der Wert der Eigenschaft Height aus der Punktgröße ermittelt werden:
Font.Height = -Font.Size * Font.PixelsPerInch / 72

Wenn die Eigenschaft Height einen positiven Wert enthält, wird die Eigenschaft Size in eine negative Zahl umgewandelt.
Wenn die Eigenschaft Size einen positiven Wert enthält, ergibt sich für die Eigenschaft Height eine negative Zahl.

Name:C

Verwenden Sie diese Eigenschaft, um die Schriftart für eine Schrift festzulegen.

Wenn die angegebene Schrift nicht auf dem System verfügbar ist, verwendet Windows eine andere Schrift.

Style:N

Die Eigenschaft Style bestimmt, ob die Schrift normal, kursiv, unterstrichen, fett usw. angezeigt wird.
Mit der Eigenschaft Style können Sie ein Attribut für die Zeichen einer Schrift vergeben. Style kann keinen, einen oder mehrere der folgenden Werte enthalten:

Wert	Bedeutung
fsBold	Der Text wird fett angezeigt.
fsItalic	Der Text wird kursiv angezeigt.
fsUnderline	Der Text wird unterstrichen.
fsStrikeout	Der Text wird durchgestrichen.

Verwendung

z.B. im Browser, im Report-Designer, in vielen Steuerelementen etc.

Beispiel

CODE

// Beispiel: Spalten-Eigenschaften eines Wiedervorlage-Memo-Browsers
// -> Einstellung von TFont im Codeblock der Vordergrundfarbe einer Textspalte 

| oFont |

oFont:= Self.ColumnFont,

// Die Abfrage auf "not Empty()" ist nötig, weil Self.ColumnFont nur bei der
// tatsächlichen Ausgabe der Spalte zur Verfügung steht
If not Empty(oFont) then

   // Die Attribute in Style können durch Addition kombiniert werden  
   // oFont.Style:= iif(Status = 'G', 0, fsItalic + fsUnderline),

   // bestehende Attribute in Style können auch mit _OR() ergänzt werden 
   // oFont.Style:= iif(Status = 'U', oFont.Style, _Or(oFont.Style, fsBold + fsUnderline)),
   if Status = 'U' then
      oFont.Style := fsBold,
   else
      oFont.Style := 0,      
   endif,

EndIf,

// Wenn der Codeblock die komplette Einstellung erledigt hat, zeigt clNone an,
// dass be keine weiteren Einstellungen vornehmen soll. Wird wie eine Farbe
// zurück gegeben, dann überschreibt diese die Farb-Einstellung, die im Codeblock
// vorgenommen wurde.
clNone