Access violation.....
type TLiveSelection = (lsMoney, lsChilds, lsTime); TLive = Array[0..1] of TLiveSelection;