[Помидоркин]

Если массив.. объявлен... в разделе переменных модуля, то одновременно с объявлением массива можно выполнить его инициализацию, т. е. присвоить начальные значения элементам массива.

Код:

Team: array[1..5] of String[10]=('Зенит','Динамо','Спартак','Ротор','СКА');

здесь все ясно, а если массив записей и отдельным полям записи нужно присвоить значения?

Код:

type

  TValueType = (vtBeer,vtLiters,vtMoney);

  TbgCell = record
   Rect: TRect;
   toEdit: Boolean;
   Case ValueType: TValueType of
    vtBeer: (Beer: String[16]);
    vtLiters: (Liters: Integer);
    vtMoney:(Money: Currency);
  end;

  TbgRow = array[0..12] of TbgCell;

например: в массиве типа TbgRow у элемента с индексом [0] значение поля toEdit всегда должно быть False, а поле ValueType всегда vtFuel, второй элемент: <массив типа TbgRow>[1].toEdit:= False; <массив типа TbgRow>[1].ValueType:= vtMoney; и т.д.
Возможно ли одновременно с объявлением массива записей присвоить начальные значения полей элемента?