Hallo,
der Compiler gibt sicherlich einen Fehler aus mit der Zeilennummer der folgenden Zeile.
write(datei, TAdressenkartei[i]);
Da steht ein Typ TAdressenkartei und danach kommt ein [. Der Compiler meint jetzt ein ( währe richtig, was einem Typ-Cast entspricht. Das ist ja nicht das was du willst, sondern du willst bestimmt den Inhalt einer Variablen (Allah) speichern.
einbeliebigername.