Læse et bestemt antal bytes af en file

Hej,

Jeg læser et bestemt antal bytes af en stor file med nedenstaaende kode. Problemet er at det virker som seek scanner fra starten a filen indtil mit index I1. Er det muligt at lave denne kode hurtigere?

assignfile(SpecRawFile,filename);
reset(SpecRawFile);
seek(SpecRawFile,I1);
I:=I1;
while (I<=I2) and (not eof(SpecRawFile))) do
    begin
    read(SpecRawFile,temp);
    ..min kode
    Inc(I);
    end;

Her indikere I1 og I2 hvor file skal læses.

Mvh,

Rune