turbo pascal - przekazywanie zmiennych plikowych do procedur...

Vein [ Sannin ]

turbo pascal - przekazywanie zmiennych plikowych do procedur...

Witam !!
mam pytanko, w jaki sposób przekazyweać zmienne plikowe do procedur ?
u mnie kod wyglada mniejwiecej tak:
type
tdata = record
imie:string[10];
nazwisko:string[20];
var
plik:file of tdata;
rek:array[1..100] of tdata;
procedure zapbaz(var rek1:array of tdata; var plik1:file);
begin
end;
BEGIN
zapbaz(rek,plik);
END.

no i wywala mi blad przy wywolaniu procedury zapbaz przy zmiennej "plik": "type missmatch", niewiem o co biega :/
jak przy procedurze napisalem: (var rek1:array of tdata; var plik1:file of Tdata);

to mi sie wykrzaczalo :/ (mowilo ze powinien byc nawias po "file" :/)