Asi nejak takto:

procedure SaveArray(var A: MyArray);
var
  S: TFileStream;
begin
  S := TFileStream.Create('cisla.dat', fmCreate);
  try
    S.Write(A, SizeOf(A));
  finally
    S.Free;
  end;
end;

procedure LoadArray(var A: MyArray);
var
  S: TFileStream;
begin
  S := TFileStream.Create('cisla.dat', fmOpenRead);
  try
    S.Read(A, SizeOf(A));
  finally
    S.Free;
  end;
end;