Der erste Schritt wäre das Zusammenfassen der Informationen zu einer Struktur:
Delphi-Quellcode:
TPersonContact = record
Funktion : string; // z.B. Leiter der EDV
Tel: string;
Fax: string;
EMail : string;
end;
Diesen Record kann man in einem Array of TPersonContact oder einer Liste (Ableitung von TList) speichern.
Wenn du schlau bist, dann bleibst du nicht bei einem Record stehen, sondern machst gleich eine Klasse daraus.
Delphi-Quellcode:
TPersonContact = class(TObject)
public
procedure ReadFromWorksheet(sheet:Worksheet; row, col:integer);
property Funktion : string; // z.B. Leiter der EDV
property Tel: string;
property Fax: string;
property EMail : string;
end;
Dann kannst du nämlich auch Methoden hinzufügen.
Die Methode ReadFromWorksheet würde die Daten aus dem übergebenen Worksheet lesen; beginnend ab der Zelle,
die mit row und col angesprochen wird.
Die Objekte der Klasse TPersonContact würde man dann in einer TObjectList speichern.