Zweck
Liste von Eingabebedingungen, die für das Editieren von Zellwerten berücksichtigt werden sollen.
Klasse
Typ
Access
Datentyp
Beschreibung
Mit dem Zugriff bDataColumn:Editable kann das Editieren von Spaltenwerten für die gesamte Datenspalte ein- bzw. ausgeschaltet werden. Wenn das Editieren von Spaltenwerten eingeschaltet ist, dann können mit dem Zugriff bDataColumn:EditCondition zusätzliche Eingabebedingungen definiert werden, wann ein Spaltenwert editiert werden darf. Es ist z.B. möglich, das ein Spaltenwert nur dann editiert werden darf, wenn ein Feld einen bestimmten Wert enthält.
Mit der Methode bDataColumn:ExistEditConditions() kann geprüft werden, ob Eingabebedingungen definiert sind.
Zusätzlich zu den Eingabebedingungen in der Datenspalte können auch für den gesamten bBrowser Eingabebedingungen mit dem Zugriff bBrowser:EditConditiondefiniert werden.
Beispiele
Das folgende Beispiel definiert eine Eingabebedingung für die Datenspalte #DEC, mit der die Eingabe verhindert wird, sofern 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 oEditCondition AS bEditCondition
// 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 die Eingabe definieren
oEditCondition := bEditCondition{'Server:TYPE<>"N"',;
oasDBSTRUCT,;
FALSE}
oColumn:EditCondition:Add(oEditCondition)
ENDIF
Siehe auch
bDataColumn:ExistEditConditions()
Page url: http://www.YOURSERVER.com/index.html?bdatacolumn_editcondition.htm