列挙型の要素の最大値って得る方法ない?

type
 TAsciiArt = (
  aaMonar,
  aaGikoNeko,
  aaChibiGiko
 );

なときに、High(TAsciiArt)ってのは駄目っぽいし・・・。