delphi中如何读写二进制文件？100分

Question

delphi中如何读写二进制文件？

Answer 1

FileOpen打开
FileRead读取
FileWrite写

Answer 2

使用内存拷贝 
CopyMemory

Answer 3

procedure TForm1.Button4Click(Sender: TObject);
var FileSave: olevariant;
   F: file;
   F2: file;
   FromSize, ToSize: integer;
   buf: array[0..2048] of char;
begin
      assignfile(f, ExtractFilepath(application.ExeName) + 'Temp.dsj');
      assignfile(f2, SaveDialog1.FileName);
      reset(f, 1);
      rewrite(f2, 1);
      blockwrite(f2, buf, sizeof(buf), ToSize);
      repeat
      
         blockread(f, buf, sizeof(buf), FromSize);
         //这里操作buf，做你想作的事
         blockwrite(f2, buf, sizeof(buf), ToSize);
         
      until (FromSize = 0) or (FromSize <> ToSize);
      closefile(f);
      closefile(f2);end;

Answer 4

1、一切文件都是“二进制”。2、用dlephi读写文件有如下方式：
(1)tfilestream
(2)file类型
(3)fileopen,fileclose,fileread,fileseek,filewrite
(4)api:createfile等以上都可以在delphi帮助里面得到解答。