TcxVerticalGridFocusedRecordChangedEvent = procedure(Sender: TcxVirtualVerticalGrid; APrevFocusedRecord: Integer; AFocusedRecord: Integer) of object;