Da könntest du ein Record benutzen:
Delphi-Quellcode:
Person = record
name: string;
Telefon: integer;
end;
Namensliste: array of Person;
Namensliste[1].name:= 'otto';
Namensliste[i].telefon:= '00495454634654';
Erwarte das Beste und bereite dich auf das Schlimmste vor.