TmatDUMMY

type TmatDUMMY = record

  case LongInt of

    0: (

        b: array [0..19] of char;

      );

    1: (

        s: array [0..9] of SmallInt;

      );

    2: (

        li: array [0..4] of LongInt;

      );

end;