Update Vittee.RecordArray.pas