Delphi en StringLists

[Dr HenDre]

Beste mensen,

voor school ben ik bezig met een opdracht waarin een soort kaartenbak geimplementeerd moet worden op 2 manieren, met een array en met een stringlist.
Ik loop nu tegen een probleem aan bij een stringlist; een stukje code:

TPersonData =
  class(TObject)
    FamilyName: String;
    Prefix: String;
    Initials: String;
    FirstName: String;
    RoomNumber: String;
    PhoneNumber: String;
  end;

function Get(I: Integer): TPersonData; virtual; abstract;

TPersonList_StringList =
  class(TPersonList)
  protected
    FList: TStringList;

function TPersonList_StringList.Get(I: Integer): TPersonData;
begin
  // check pre-condition
  Assert((0 <= I) and (I < FList.Count) ,
    Format('TPersonList_StringList.Get.pre failed; I = %d',[I]));

  Result := FList.Objects[I];
end;

Maar nu krijg ik Incomparable types TPersonData and TObject, terwijl TPersonData van TObject is afgeleid. Ik heb ook dingen geprobeerd als
temp: TObject;
temp := FList.Objects[I];
with temp as TPersonData do
begin
Result := temp;
end;

maar blijf dezelfde melding houden.
Iemand een suggestie, het moet voor morgen vroeg af

[Dr HenDre]

Ik was dichtbij, oplossing was dus

Result := (FList.Objects[I]) as TPersonData;

Topic kan weg/op slot wat mij betreft