VOTools for Visual Objects  
and Vulcan.NET  

bBrowser => Tipps & Tricks => Wie können für Farbbedingungen die Selektionsfarben ...    




 ab bBrowser
1.4
  bBrowser 1.4 (Limited)
ja
 

Wie können für Farbbedingungen die Selektionsfarben definiert werden?

In der Klasse bColorCondition sind die Zugriffe
SelectedBackground
SelectedForeground
InactiveSelectedBackground
InactiveSelectedForeground
definiert.

Mit diesen Zugriffen können die Vorder- und Hintergrundfarben definiert werden, die verwendet werden sollen, wenn die Farbbedingung für eine Datenzelle zutrifft und die Datenzelle selektiert ist.

Das folgende Codefragment demonstriert die Vorgehensweise:

  METHOD PostInit() CLASS myDataWindow
  LOCAL odbsCUSTOMER   AS bDBServer
  LOCAL oCC            AS bColorCondition
  LOCAL cCondition     AS STRING

  odbsCUSTOMER := bDBServer{"CUSTOMER.DBF"}
  IF odbsCUSTOMER:Used
    self:oDCBrowser:Use(odbsCUSTOMER)

    cCondition := "Year(Today())-Year(Server:BIRTHDAY)>=40"
    oCC := bColorCondition{cCondition,;
                           odbsCUSTOMER,;
                           Color{COLORYELLOW},;
                           Brush{Color{COLORRED}}}
    oCC:SelectedForeground := Color{COLORYELLOW}
    oCC:InactiveSelectedForeground := Color{COLORYELLOW}

    self:oDCBrowser:ColorCondition:Add(oCC)

    self:oDCBrowser:Refresh()
    self:oDCBrowser:Redraw()
  ENDIF

Copyright © 2003-2015 BEFO GmbH