Я должен выделить и свободные записи при использовании TList <T> в Delphi?

Вопрос более или менее говорит все это. Учитывая следующую рекордную структуру:

type
    TPerson = record
        Name: string;
        Age: Integer;
    end;
    PPerson = ^TPerson;
    TPersonList = TList<TPerson>;

Действительно ли следующий код действителен?

procedure ReadPeople(DataSet: TDataSet; PersonList: TPersonList);
begin
    PersonList.Count := DataSet.RecordCount;
    if DataSet.RecordCount = 0 then
        Exit;

    DataSet.First;
    while not DataSet.Eof do begin
        PersonList[DataSet.RecNo].Name := DataSet.FieldByName('Name').AsString;
        PersonList[DataSet.RecNo].Age := DataSet.FieldByName('Age').AsInteger;
        DataSet.Next;
    end;
end;

Сделайте я должен использовать GetMem/FreeMem выделить и освободить записывают экземпляр TPersonList, или действительно ли я свободен к непосредственно доступу TPersonList записи непосредственно? Мой пищеварительный тракт говорит, что код должен быть действительным, хотя я не уверен, существуют ли какие-либо морщины, связанные с рекордной инициализацией или завершением.