var
myfile, Newfile: File;
unit1: array[1..20] of byte;
begin
AssignFile(myfile, 'test.dat');
reset(myfile, 1);
blockread(myfile, unit1, sizeof(unit1));
CloseFile(myfile);
end.
K I use block read, but I want to skip first block and read and write the rest to new file.
Sorry for...