TDimInfo = record
  iState: TDimState;
  iValue: Integer;
  iIndex: Integer;
  iActiveIndex: Integer;
  iRowState: TRowState;
  iGroup: TDimGroup;
end;

struct TDimInfo {
  TDimState iState;
  int iValue;
  int iIndex;
  int iActiveIndex;
  TRowState iRowState;
  TDimGroup iGroup;
};