type
  Dish = record
    Name :string;
    Price :Integer;
  end;  Dishes = array[0..3] of Dish;
  
  ... = class
    ...
    private
      //在这里初始化一个数组可以吗?我看到一本书是这样的,可是我这里编译不能通过
      ADishes :Dish = 
        ((Name:...;Price:...),
         (Name:.............),
         ...
         ...                ));
  ...
  end;另外,我特别想写成这样
去掉Dish的定义部分。
然后数组定义成这样://Dishes不在是一个类型了,而成了一个变量。
Dishes :array[0..3] of Dish=((...);(...);(...);(...););
这样写可以吗?
因为我定义一个数组,却要付出好几个英文单词。痛苦。