ENTRY OnItemValidate(IN INT _refId, INT _row, INT _col, IN TEXT _value, BOOL _bValid) ; akcie END OnItemValidate |
ENTRY XXX_OnItemValidate(INT _row, INT _col, IN TEXT _value, BOOL _bValid) ; akcie END XXX_OnItemValidate |
| _refId | Pre globálnu obsluhu - povinný vstupný parameter typu Int. |
| XXX | Meno Referenčnej premennej pripojenej ku grafickému objektu bez úvodného znaku "_". |
| _row, _col | Riadok, stĺpec políčka, ktorému je potrebné odsúhlasiť hodnotu. |
| _value | Nová hodnota políčka. |
| _bValidate | Výstupný parameter - príznak platnosti hodnoty. |
ENTRY browser_OnItemValidate(INT _row, INT _col, IN TEXT _value, BOOL _bValid)
IF _col = 1 THEN
INT _val
_val := %StrToI(_value)
IF !_val\VLD THEN
_bValid := @FALSE
ELSIF _val > _row THEN
_bValid := @FALSE
ELSE
_bValid := @TRUE
_row := _row+1
IF _row > _rec\DIM THEN
_row := 1
ENDIF
ENDIF
ELSE
_bValid := @TRUE
ENDIF
END browser_OnItemValidate
BEGIN
REDIM _rec[10]
END |
ENTRY OnItemValidate(IN INT _refId, INT _row, INT _col, IN TEXT _value, BOOL _bValid)
IF _refId = _browser THEN ;test určujúci, v ktorom zobrazovači došlo k udalosti
; akcie
ENDIF
END OnItemValidate |