type
  TRecordType = record
  strict private
    FA: Int32;
    FB: Int32;
  public
    constructor Create(const A, B: Int32);
    property A: Int32 read FA;
    property B: Int32 read FB;
  end;

  TRecordTypeList = TList<TRecordType>;

implementation
{ TRecordType }

constructor TRecordType.Create(const A, B: Int32);
begin
  FA := A;
  FB := B;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  List: TRecordTypeList;
  i: Int32;
begin
  List := TRecordTypeList.Create();
  for i := 0 to 10 do
    // Так красивее
    List.Add(TRecordType.Create(i * 1, i * 2));
end;