TMaskChar

type TMaskChar = record

  case CharType: TMaskCharType of

    mcChar: (

        CharValue: Char;

      );

    mcCharSet: (

        Negative: Boolean;

        SetValue: PCharSet;

      );

    mcAnyChar, mcAnyText: (

      );

end;