Tentei gerar o registro I053 e começou a ocorrer erro de violação de acesso, então vi no OnCreate do I050 que a lista do I053 não estava sendo criada.
Sugiro alterar:
constructor TRegistroI050.Create;
begin
FRegistroI051 := TRegistroI051List.Create;
FRegistroI052 := TRegistroI052List.Create;
end;
destructor TRegistroI050.Destroy;
begin
FRegistroI051.Free;
FRegistroI052.Free;
inherited;
end;
Por:
constructor TRegistroI050.Create;
begin
FRegistroI051 := TRegistroI051List.Create;
FRegistroI052 := TRegistroI052List.Create;
FRegistroI053 := TRegistroI053List.Create;
end;
destructor TRegistroI050.Destroy;
begin
FRegistroI051.Free;
FRegistroI052.Free;
FRegistroI053.Free;
inherited;
end;
Abraços