Проблема в том что свойств у меня не 2 а больше, также присутсутсвуют динамические массивы состоящие из объектов(см. ниже)

TFirm = class // созданный класс
  fid      : Word; 
  firmname : String;
  ADDR     : array of TADDR; <------ 
end;