Record und in File speichern

[Nicodius]

ich hab dasselbe problem

Delphi-Quellcode:

  Vert_Ent = record
  vtjahr : Integer;
  vtproz : array [0..11] of Integer;
end;

Steuer = record
  st_bez : string[30];
  st_jahr : array [0..11] of Integer;
  st_vert : string[10];
  st_aufk : array [0..11] of longint;
end;

Modell = record
  und_bez : string[30];
  und_st  : array [0..31] of Steuer;
end;


Alles= record
  Vert_ast : array [0..30] of array [0..22] of string ;
  vert_datum : array [0..31] of Vert_ent;
  mod_ : array [0..15] of Modell; 


procedure TMain.Speichern1Click(Sender: TObject);
var
  stream            : TFileStream;
  filename          : string;
begin
  filename := ChangeFileExt (Application.ExeName, '.ext'); // Filename setzen
  stream := TFileStream.Create (filename, fmCreate); // Stream erzeugen
  try
    stream.WriteBuffer (TAlles^, SizeOf (TAlles));  // hier kommt eine fehelrmeldung dass nach TAlles^ eine klammer fehlt (  und  
                                                    // dass eine anweisung erforderlich ist aber ein integer gefunden wurde
  finally
    stream.Free; // Stream wieder freigeben
  end;
end;

was mach ich falsch?

lg nico