type
TacBtnOrder =
-1..32767
;