[Страдалецъ]

А нельзя делать константу для структуры имеющую динамический размер.
Вот если бы написали примерно так:

Код:

 TRecord_1=record
   _Record_1_integer:  integer;
   _Record_1_string:   string;
 end;
 TRecord_2=record
   _Record_2_integer:  integer;
   _Record_2_string:   string;
   _Record_2_Record_1: array[1..1] of TRecord_1;
 end;

const
 Record_2:array [0..0] of TRecord_2=
 ((_Record_2_integer:  0;
   _Record_2_string:   '';
   _Record_2_Record_1: ((_Record_1_integer:1; _Record_1_string:''))))

то все было-бы хокей.