character_set

type character_set = record

  number: cuint;

  state: cuint;

  csname: Pchar;

  name: Pchar;

  comment: Pchar;

  dir: Pchar;

  mbminlen: cuint;

  mbmaxlen: cuint;

end;