smartsuitefaq.martinholz.de

Anzeige negativer Werte in rot (Wechsel der Fontfarbe mit Lotus Script)

Für die Versionen 2.1 und 3.0x: Hier müssen Sie zwei berechnete Felder erstellen. Eines stellt eine Zahl lediglich dar, wenn sie einen negativen Wert hat.:

IF(Zahl < 0; Zahl;'')

das andere Feld zeigt eine Zahl lediglich an, wenn sie positiv ist:

IF(Zahl > 0; Zahl;'')

Fügen Sie die beiden Felder in Ihr Formular ein, und stellen Sie die Füllfarbe für beide Felder auf 'transparent' und die Zeichenfarbe für das Feld mit den negativen Werten auf 'rot'. Richten Sie nun die beiden Felder exakt übereinander aus, so daß Sie absolut deckungsgleich sind und schalten Sie die Labelbeschriftung in 'Eigenschaften Feld' ab. Wenn Sie eine Beschriftung für das Feld benötigen, erstellen Sie eine Textbox als Beschriftung.

In Version 96: Hier können Sie entweder die gleiche Methode wie oben beschrieben verwenden, oder aber mittels folgendem LotusScript zum gleichen Ergebnis kommen:

Sub Lostfocus(Source As Fieldbox)
    If Val(CurrentView.Body.YourFieldName.Text) <= 0 Then
        currentview.Body.YourFieldName.font.color.setrgb(color_red)
    Else
        currentview.Body.YourFieldName.font.color.setrgb(color_black)
    End If
End Sub

Um die Hintergrundfarbe zu ändern, ändern Sie das Script ab:

currentview.Body.FELDNAME.background.color.setrgb(color_red)

Über diesen ArtikelArtikelbewertung
Stand: 19.01.2008
Autor(en): John Brown, Martin Holz
engl. Original: www.netspace.net.au/~jabrown/approach/webfaq04160330.html
Durchschnittsnote: 2
1 2 3 4 5 6