Zweck
Definiert eine Bedingung, ob ein Element selektiert werden kann.
Klasse
bSelectCondition
Zugriffe
Selectable | (Access / Assign) |
Methoden
Erbt von
<kein Vorfahre>
Vererbt an
<kein Nachfahre>
Beschreibung
Für einzelne Zeilen, Spalten oder auch Zellen kann über eine Bedingung definiert werden, ob diese selektiert werden können.
Die Klasse bSelectCondition wird in der Klasse bDataColumn unterstützt.
Beispiel
Das folgende Beispiel definiert eine Selectable-Bedingung für die Datenspalte #DEC, mit der die Datenspalte nicht selektiert werden kann, wenn das Feld #TYPE nicht den Wert "N" enthält.
LOCAL oasDBSTRUCT AS bArrayServer
LOCAL auStruct AS ARRAY
LOCAL oBrowser AS bBrowser
LOCAL oColumn AS bDataColumn
LOCAL oSelectCondition AS bSelectCondition
// bArrayServer erzeugen
auStruct := {;
{"NAME", "C", 10, 0},;
{"TYPE", "C", 1, 0},;
{"LEN", "N", 3, 0},;
{"DEC", "N", 2, 0};
}
oasDBSTRUCT := bArrayServer{auStruct}
// bBrowser erzeugen
oBrowser := bBrowser{oOwner,;
1000,;
Point{0, 0},;
Dimension{300, 250}}
oBrowser:Use(oasDBSTRUCT)
oBrowser:Show()
// Datenspalte #DEC ermitteln
oColumn := oBrowser:GetColumn(#DEC)
IF oColumn<>NULL_OBJECT
// Bedingung für das Selektieren definieren
oSelectCondition := bSelectCondition{'Server:TYPE<>"N"',;
oasDBSTRUCT,;
FALSE}
oColumn:SelectCondition:Add(oSelectCondition)
ENDIF
Siehe auch
Page url: http://www.YOURSERVER.com/index.html?bselectcondition.htm