Delphi RECORD global deklarieren!?

procedure TForm1.FormCreate(Sender: TObject);     
     type Tneptun = record
     Bungalow: byte;
     Vorname: string[20];   // Pers.Daten und Wohnadresse des Mieters
     Nachname: string[20];
     Geboren: string[10];
     Stadt: string[30];     // incl.PLZ
     TelNr: string[30];
     HandyNr: string[30];
     Mail: string[30];
     Vertragvom: string[10]; // Datum
     Vertragbis: string[10]; // Datum
     Miete: real;
     Zaehlerstand: integer; // Daten zum betr. Bungalow
     Zvom: string[10];      // Zählerstand vom: Datum
     Wasserstand: integer;
     Wvom: string[10];      // Wasserstand vom: Datum
     Offen: real;
     OffenSeit: string[10]; // Datum
     end;

var Bungalow: Array[1..13] of Tneptun;
    i,j: integer;
    f23: file of Tneptun;

begin
assignfile(f23,'D:\rec.dat');
reset(f23);
i:=0;
while not eof(f23) do
      begin inc(i);
      read(f23,Bungalow[i]);
      Mieter[i]:='Bungalow '+inttostr(Bungalow[i].Bungalow);
      end;
closefile(f23);
//...
end;