delphi如何读取.bin文件？

Question

delphi如何读取bin文件，并将读取结果在memo中显示出来？

Answer 1

function ReadFile(FileName:String):boolean;
var
 F:File;
 Src:Array[0..31] of Char;
 i,resu:Integer;
begin
 result:=True;
 if not FileExists(FileName) then
  begin
   result:=false;
   exit;
  end;
 AssignFile(F,FileName);
 Reset(F,1);
 while not Eof(F) do
  begin
   BlockRead(F,Src,sizeof(Src),resu);
   for i=0 to Resu do
     Memo1.Lines.add(Src[Resu]);
  end;
 CloseFile(F);
end;

Answer 2

result没定义,不懂是啥东东需要定义下