|
|
|
|
|
|
|
|
|
|
Version 6.8
PV Add font (Bereich; Name) 
Lange Ganzzahl
| Parameter | Typ | Beschreibung | |
| Bereich | Lange Ganzzahl | | 4D View Bereich |
| Name | String | | Schriftname |
| Funktionsergebnis | Lange Ganzzahl |  | Schriftnummer |
Beschreibung
Die Funktion PV Add font fügt in Bereich eine Schrift mit dem Parameter Name ein und gibt die dazugehörige Nummer zurück.
Ist Name bereits vorhanden, gibt PV Add font die dazugehörige Nummer zurück. Sie erhalten diese Nummer auch über den Befehl PV GET FONT LIST.
Weitere Informationen zum Zuordnen von Schriften in einem 4D View Bereich finden Sie im Abschnitt Einleitung zu PV Stil.
Beispiel
Diese Methode funktioniert im Wechsel: Sie entfernt eine Schrift aus dem 4D View Bereich oder fügt sie hinzu, wenn sie entfernt wurde.
C_STRING(255;$FontName)
`Name der Schrift, die im Bereich hinzugefügt/entfernt werden soll.
ARRAY LONGINT($FontNumArray;0) `Array mit Schriftnummern
ARRAY STRING(255;$FontNameArray;0) `Array mit Schriftnamen
C_INTEGER($Position) `Position der Schrift in Array mit Nummern bzw. Namen
$FontName:="Arial"
PV GET FONT LIST (Bereich;$FontNumArray;$FontNameArray)
`Liste der verfügbaren Schriften
$Position:=Find in array($FontNameArray;$FontName)
If ($Position=-1) `Schrift nicht im Bereich?
$Position:=Size of array($FontNameArray)+1 `Fehlende Schrift hinzufügen
INSERT ELEMENT($FontNumArray;$Position) `...Arrays
INSERT ELEMENT($FontNameArray;$Position) `Anpassen...
$FontNameArray{$Position}:=$FontName `Name für neue Schrift zuweisen
$FontNumArray{$Position}:=PV Add font (Bereich;$FontName)
`Nummer für neue Schrift zuweisen
Else `Schrift gibt es bereits im Bereich
PV REMOVE FONT (Bereich;$FontNumArray{$Position}) `Entfernen
End if
Referenz
PV GET FONT LIST, PV REMOVE FONT.
|
|
|
|
|
|
|
|
|
|