谁能帮我在下面例句里做注释?
var
 f:file;
 size:integer;
 buffer:pchar;
begin
 assignfile(f,'test,txt');
 reset(f,1);                     //reset是什么意思?
 Try                             //Try是什么意思?
  size:=filesize(f);
  getmem(butter,size);
  Try
   blockread(f,buffer^,size);  //blockread是什么意思?
   processfile(buffer,size);   //processfile是什么意思?
  finally                      //finally是什么意思?
   freemem(butter);
  end;
finally
 closefile(f);
end;

解决方案 »

  1.   

    var
     f:file;
     size:integer;
     buffer:pchar;
    begin
     assignfile(f,'test,txt');
     reset(f,1);                     //只读方式打开?
     Try                             //Try...finally end 保证能够释放对象。
      size:=filesize(f);
      getmem(butter,size);
      Try
       blockread(f,buffer^,size);  //块操作。
       processfile(buffer,size);   //processfile是什么意思?
      finally                      //Try...finally end 保证能够释放对象。
       freemem(butter);
      end;
    finally
     closefile(f);
    end;
      

  2.   

    reset重设指针,回到文件首
    blockread读指针f到buffer指针,大小为sizeprocessfile应该是释放一些资源,不至于别的软件不能操作这个文件