WR SET TAB

4D - Documentation   Français   English   German   4D Write, Befehle nach Thema   4D Write, Befehle alphabetisch   Konstanten nach Thema   Back   Previous   Next

Version 6.5


WR SET TAB (Bereich; TabNr; Ort; Ausrichtung; Füllzeichen)

ParameterTypBeschreibung
BereichLange Ganzzahl4D Write Bereich
TabNrLange GanzzahlNummer des Tabulators
OrtNumerischNeue Position des Tabulators
AusrichtungGanzzahlNeuer Wert für Ausrichtung des Tabulators
FüllzeichenStringNeues Füllzeichen

Beschreibung

Mit dem Befehl WR SET TAB setzen Sie die Parameter des Tabulators mit der Nummer TabNr (Tabulatoren werden von links nach rechts gezählt). Der Befehl WR SET TAB bewegt den Tabulator auf Ort und setzt Füllzeichen und Ausrichtung.

Der ausgewählte Tabulator wird für alle Absätze der aktuellen Auswahl geändert.

Gibt es an der neuen Position bereits einen Tabulator, wird er durch den geänderten Tabulator ersetzt.

Ort ist der Abstand vom linken Rand. Er wird in der Standardeinheit des Dokuments angegeben. Wollen Sie die Position des Tabulators nicht verändern, übergeben Sie im Parameter den Wert -1.

Ausrichtung definiert die Art des Tabulators. Wollen Sie die Ausrichtung des Tabulators nicht verändern, übergeben Sie -1. Sonst können Sie eine der folgenden Konstanten unter dem Thema WR Tabs verwenden:

Konstante (Wert)Ausrichtung
wr left tab (1)Linksbündig
wr centered tab (2)Zentriert
wr right tab (3)Rechtsbündig
wr decimal tab (4)Dezimal
wr vertical separator tab (5)Vertikale Trennlinie

Der optionale Parameter Füllzeichen kann jedes Zeichen mit einem Code zwischen 33 und 127 sein. Dieses Zeichen wird in derselben Schrift wie der geänderte Tabulator hinzugefügt.

Beispiel

Sie möchten im ausgewählten Text den Tabulator bei 168 Punkt löschen, den Tabulator von 252 auf 280 Punkt verschieben und das Füllzeichen '$' zuweisen:

   C_LONGINT(Bereich;$i;$Nbtab;$Unit;$uniforme;$Justif)
   C_REAL($Pos)
   C_STRING(2;$fill)
   $Nbtab:=WR Get text property(Bereich;wr tab;$uniforme)
      `Speichere aktuelle Einheit für das Dokument
   $Unit:=WR Get doc property(Bereich;wr unit)
   If ($Unit#2)
         `Setze Einheit auf Punkt, falls das noch nicht der Fall ist
      WR SET DOC PROPERTY(Bereich;wr unit;2)
   End if
   $i:=1
   Repeat 
      WR GET TAB(Bereich;$i;$pos;$Justif;$fill)
      Case of 
         : ($Pos=168)
               `Lösche Tabulator auf 168 Punkt
            WR DELETE TAB(Bereich;$i)
            $Nbtab:=$Nbtab-1
         : ($Pos=252)
               `Bewege Tabulator von 252 Punkt auf 280 Punkt
            WR SET TAB(Bereich;$i;350;$Justif;"$")
            $i:=$i+1
      End case 
   Until ($i=$Nbtab)
      `Gehe zurück zur ursprünglichen Einheit des Dokuments
   WR SET DOC PROPERTY (Bereich;wr unit;$Unit)

Referenz

WR GET TAB, WR SET STYLESHEET TAB.


4D - Documentation   Français   English   German   4D Write, Befehle nach Thema   4D Write, Befehle alphabetisch   Konstanten nach Thema   Back   Previous   Next