文件操作时通过返回值返回文件内容出错？

Question

将文件内容读入到一个字符串中。文件内容为二进制得数据
function TMyCipher.LoadBuffer(strFile: string): string;
var
  hFile: TFileStream;
begin
  hFile := TFileStream.Create(strFile, fmOpenRead);
  hFile.Read(Result, hFile.Size);
  hFile.Free;
end;访问返回值时出现非法操作。为啥？

Answer 1

修改如下:
SetLenth(Result, hFile.Size+1);
hFile.Read(Result, hFile.Size);

Answer 2

function TMyCipher.LoadBuffer(strFile: string): string;
var
  slTmp: TStrings;
begin
  slTmp:= TStringList.Create; 
  slTmp.LoadFromFile(strFile);
  result:= slTmp.Text;
  slTmp.Free;
end;