delphi中有读入、保存二进制文件的控件吗？

Question

有这种控件吗，我就想用delphi对一个二进制的文件进行读写操作？

Answer 1

不用控件的；
下面是刚在那边看到的一个【月亮】写的程序；实现了对二进制文件的读写操作；
var
  f1, len: integer;
  str : string;
begin
  f1 := fileopen('testread.bin', fmOpenRead);
  if f1 > 0 then
  begin
    len := fileseek(f1, 0, 2);
    fileseek(f1, 0, 0);
    str := stringofchar(#0, len);
    fileread(f1, str[1], len);
    fileclose(f1);
  end;
  f1 := createfile('testwrite.bin');
  if f1 > 0 then
  begin
    filewrite(f1, str[1], len);
    fileclose(f1);
  end;
end;