help,关于如何访问枚举类型的数组

Question

alphabet=(A,R,N,D,C,Q,E,G,H,I,L,K,M,F,P,S,T,W,Y,V);Tblosum50=array[alphabet,alphabet]of integer;  //Blosum50替换矩阵存放在常量的二维数组中
  const blosum50:Tblosum50＝『这边是一个整型的二维数组』请问：我想访问这个下标为枚举类型的二维数组该如何访问。
比如，我有一对字符 Q
                  A
我现在想访问blosum[Q,A]的值该如何访问？？？？
急啊！！！

Answer 1

alphabet=(A,R,N,D,C,Q,E,G,H,I,L,K,M,F,P,S,T,W,Y,V);
Tblosum50=array[alphabet,alphabet]of integer;const blosum50:Tblosum50=(这边为一个二维数组赋值)请问：我该如何访问这个下标为枚举类型的二维数组的元素呢？
如，现在有一对字符：A
                   N
 我该如何取出blosum50[A,N]的值？？？

Answer 2

枚举是有序的alphabet=(A,R,N,D,C,Q,E,G,H,I,L,K,M,F,P,S,T,W,Y,V);
它们都是有序号的，你就分别得出A，N所在的序号，就可以访问数组了，
好久没搞DELPHI了，如果没记错的话，序号是从1开始，那么你访问blosum50[A,N]实际上就是访问blosum50[1,3]