Комбинированные типы данных и массивы

[mar4elo]

Type
  Zapis = record
    UIN : integer;
    STR : String;
  end;

var
  Form1 : TForm1;
  Mas : Array [0..10] of Zapis;

implementation
...

Подскожите пожалуйста как записать такой массив в файл затем прочитать из файла???

[SunKnight]

Type
  Zapis = record
    UIN : integer;
    STR : String;
  end;
type Mas = Array [0..10] of Zapis;
var   F:file of Mas;
      M:Mas;

Типизированные файлы.

[mar4elo]

type
  Zapis = record
    UIN : integer;
    STR : String;
  end;
Mas = Array [0..10] of Zapis;

var
  Form1 : TForm1;
  Fil: File OF Mas ;//Сдесь выдает ошибку

[mar4elo]

[DCC Error] Unit1.pas(28): E2155 Type 'Mas' needs finalization - not allowed in file type

[mar4elo]

Весь мой код

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type

  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
type
  Zapis = record
    UIN : integer;
    STR : String;
  end;
Mas = Array [0..10] of Zapis;

var
  Form1 : TForm1;
  Fil: File OF Mas ;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
//Assign(Fil,'File.txt'); 
end;
end.

[SunKnight]

Даже скопировать толком не могут, эх...
type Mas = Array [0..10] of Zapis;

[mar4elo]

Ошибку выдает в этой строчке:

  Fil: File OF Mas ;

[SNUPY]

Помоему не будет работать пока стринг не ограничим:

type
Zapis = record
UIN : integer;
STR : String[100];
end;
Mas = Array [0..10] of Zapis;

PS Может и ошибаюсь ^_^

[SunKnight]

Type
  Zapis = record
    UIN : integer;
    STR : String[255];//максимально возможное кол-во символов в строке, к сожелению
  end;
type Mas = Array [0..10] of Zapis;
var   F:file of Mas;
      M:Mas;

[SNUPY]

ну 100 я образно предлагал ^_^