[icWasya]

Как вариант - если все поля одинакового типа и расположены подряд, то можно извернуться так

Код:

type
  TM = record
    case boolean of
      true:( 
          A:integer;
          B:integer;
          C:integer;
          );
     false:(X:array[0..2] of integer;)
  end;

прочитайте про case внутри record