типизированный файл

[fate]

можно ли сделать так?

f:file of array[0..9,0..9] of integer;

попытался сделать так

mas:array[0..9,0..9] of integer;
...........
procedure TForm1.Button1Click(Sender: TObject);
var f:file of array[0..9,0..9] of integer;
begin
AssignFile(f,'myfile.dat');
ReWrite(f);
Write(f,mas);
CloseFile(f);

end;

ошибка несовместимости типов
mas предварительно заполнил.

Или нельзя так?

[Aristarh Dark]

Сделай свой тип данных.

[fate]

Сообщение от Aristarh Dark

Сделай свой тип данных.

пробовал так

type
m=array[0..9,0..9] of integer;
...................
var f:file of m;
begin
AssignFile(f,'myfile.dat');
ReWrite(f);
Write(f,m);

пишет на строчке Write(f,m);
'(' expected but ')' found

[chertovich]

type
  TFileInt = array[0..9, 0..9] of Integer;
.....
var
  FileInt: file of TFileInt;

[Serge_Bliznykov]

Сделай свой тип данных.

type TMyDuoArray = array[0..9,0..9] of integer;
...
var f:file of TMyDuoArray;
     mas : TMyDuoArray;
...
  Write(f, mas);
..

или полностью:

type TMyDuoArray = array[0..9,0..9] of integer;

var f:file of TMyDuoArray;
    mas : TMyDuoArray;

begin
  mas[1,1] := 100;
  Assign(f, 'tes90.dat');
  Rewrite(f);
  Write(f, mas);
  Close(f);
end.

[fate]

Serge_Bliznykov, понял в чем мой косяк был спасибо