4D v13
WR Get stylesheet font
- 4D Write Programmiersprache
-
- WR Stilvorlage
-
- Einleitung zu WR Stilvorlage
- WR ADD STYLESHEET TAB
- WR APPLY STYLESHEET
- WR Create stylesheet
- WR DELETE STYLESHEET
- WR DELETE STYLESHEET TAB
- WR Get stylesheet font
- WR GET STYLESHEET INFO
- WR GET STYLESHEET TAB
- WR Get stylesheet text prop
- WR SET STYLESHEET FONT
- WR SET STYLESHEET INFO
- WR SET STYLESHEET TAB
- WR SET STYLESHEET TEXT PROP
- WR UPDATE STYLESHEET
WR Get stylesheet font
| WR Get stylesheet font ( Bereich ; StilvorlageNr ) -> Funktionsergebnis | ||||||||
| Parameter | Typ | Beschreibung | ||||||
| Bereich | Lange Ganzzahl |
|
4D Write Bereich | |||||
| StilvorlageNr | Lange Ganzzahl |
|
Nummer der Stilvorlage | |||||
| Funktionsergebnis | String |
|
Name der Schrift oder "" wenn nicht definiert | |||||
Die Funktion WR Get stylesheet font gibt den Namen der Schrift zurück, die der Stilvorlage StilvorlageNr im 4D Write Dokument Bereich zugewiesen wurde. Stilvorlagen sind wie im Dialogfenster Stilvorlagen von oben nach unten numeriert. Wurde für diese Stilvorlage keine Schrift definiert, wird ein leerer String zurückgegeben.
Sie wollen das Attribut "Schrift" immer aus den betreffenden Stilvorlagen entfernen, wenn die Schrift nicht im System installiert ist:
ARRAY STRING(80;FontsArray)
WR FONTS TO ARRAY(FontsArray)
$StyleSheetNum:=WR Count(Bereich;wr nb stylesheets)
For($i;1;$StyleSheetNum)
$Fonts:=WR Get stylesheet font(Bereich;$i)
If(($Fonts#"")&(Find in array(Bereich;$Fonts)=0))
WR SET STYLESHEET FONT(Bereich;$i;"")
End if
End for
Produkt: 4D
Thema: WR Stilvorlage
Nummer:
89462
Alphabetische Liste der Befehle
Erstellt: 4D Write 6.5
WR Get font
WR SET STYLESHEET FONT
