4D Write v16WR INSERT PAGE NUMBER |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D Write v16
WR INSERT PAGE NUMBER
|
WR INSERT PAGE NUMBER ( Bereich ; Format ; NrTyp ) | ||||||||
Parameter | Typ | Beschreibung | ||||||
Bereich | Lange Ganzzahl |
![]() |
4D Write Bereich | |||||
Format | Ganzzahl |
![]() |
Formattyp | |||||
NrTyp | Ganzzahl |
![]() |
Einzufügende Nummer, 0 = Seitennummer, 1 = Gesamtanzahl der Seiten | |||||
Mit dem Befehl WR INSERT PAGE NUMBER fügen Sie an der Cursor-Position eine Referenz mit der aktuellen Seitennummer oder der Gesamtanzahl der Seiten ein. Die Referenz kann im Haupttext, Fuß- oder Kopfteil stehen. Mit dem Befehl WR SET FRAME setzen Sie den Cursor in einen dieser Bereiche.
Mit Format wählen Sie das Anzeigeformat für die einzufügende Referenz. In diesem Format können Sie eine der folgenden Konstanten unter dem Thema WR Seitennummern Formate übergeben.
Konstante | Typ | Wert |
wr 123 | Lange Ganzzahl | 0 |
wr abc | Lange Ganzzahl | 1 |
wr ABC | Lange Ganzzahl | 2 |
wr i ii iii | Lange Ganzzahl | 3 |
wr I II III | Lange Ganzzahl | 4 |
Mit dem optionalen Parameter NrTyp fügen Sie entweder die aktuelle Seitennummer oder die Gesamtanzahl der Seiten ein. Übergeben Sie die Konstante wr page number (Wert 0) oder übergeben Sie diesen Parameter nicht, wird die aktuelle Seitennummer eingefügt. Übergeben Sie die Konstante wr total number of pages (Wert 1), wird die Gesamtanzahl der Seiten eingefügt.
Die Methode OddPages ist einer Variablen zugeordnet, die sich im Fußteil des aktuellen Dokuments befindet:
`Prüfe, ob der Modus "Unterschiedlich auf linker und rechter Seite" bereits aktiviert ist
If(WR Get doc property(Bereich;wr different left right pages)#1)
`Wenn nicht, aktiviere diesen Modus
WR SET DOC PROPERTY(Bereich;wr different left right pages;1)
ALERT("Warnung: Dok. ist nun im Modus Unterschiedlich auf linker u.rechter Seite!")
End if
`Setze Cursor in linken Fußteil
WR SET FRAME(Bereich;wr left footer)
`Füge 'Seite X' in großen römischen Ziffern ein
WR INSERT TEXT(Bereich;"Seite ")
WR INSERT PAGE NUMBER(Bereich;wr i ii iii;wr page number)
WR INSERT TEXT(Bereich;" von ")
WR INSERT PAGE NUMBER(Bereich;wr i ii iii;wr total number of pages)
Produkt: 4D Write
Thema: WR Datenbankobjekte
Nummer:
89473
Geändert: 4D Write 6.5.3
4D Write Programmiersprache ( 4D Write v16)